# NOT RUN {
## attach dataset to search path (to use variable names)
attach(learning_motivation)
## adjusted index print
padj <- print(sdi(intrinsic, identified, introjected, external))
## compactly displayed structure of the object padj
str(padj)
## original index print
sdi(intrinsic, identified, introjected, external, compute.adjusted = FALSE)
# }
Run the code above in your browser using DataLab