Nothing
# final germination percentage
# equacao: fgp = n/N x 100
# n is the number of germinated seeds and N is the total number of seeds
FGP <- function(nger, Nseeds) {
n <- max(nger)
result <- n/Nseeds * 100
return(result)
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.