suppressPackageStartupMessages(library(oce)) filenames <- list.files("../../../tests/testthat/local_data/ad2cp", "*ad2cp", full.names=TRUE) for (filename in filenames) { cat("FILE:", filename, "\n") print(read.oce(filename, which="?")) cat("\n") }
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.