Nothing
readJEOLascii <- function(file = "") {
# ChemoSpec, Bryan Hanson, June 2016
# This function reads the JEOL ascii NMR format
# The data consists of X, Real & Imaginary fields tab separated.
DF <- read.table("JEOL_ascii.asc", header = TRUE, sep = "\t")
res <- data.frame(x = DF$X, y = DF$Real)
}
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.