n <- c(50, 1000)
fcor <- c(.7, 1) # focal trait correlation
conditions <- tidyr::crossing(n, fcor)
colnames(conditions) <- c("n", "fcor")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.