plate<-function(i){
data.frame(
Well_index = 1:i,
Wells = plates::well(i),
loc = plates::outer_well(i),
typical_background_wells = plates::background(i),
stringsAsFactors=FALSE
)
}
plate8 <- function(){plate(8)}
plate24 <- function(){plate(24)}
plate96 <-function(){
x<-plate(96)
x$rings <-plates::rings_96()
x
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.