# Assuming 'set' is an ena.set object:
data(RS.data)
codes <- c("Data", "Technical.Constraints", "Performance.Parameters",
"Client.and.Consultant.Requests", "Design.Reasoning",
"Collaboration")
units <- c("Condition", "UserName")
horizon <- c("Condition", "GroupName")
enaset <- RS.data |>
accumulate(units, codes, horizon) |>
sphere_norm() |>
center() |>
rotate() |>
project()
Run the code above in your browser using DataLab