# opts <- getDefaultOpts() # Get the default options
# opts$verbose <- 1 # Change some of them
# opts$init.tau <- 10^5
# Run the model with the new options
# model <- CCAexperiment(Y,K,opts)
Run the code above in your browser using DataLab