the.chosen.ones <- c("Date.time", "times", "Bar.Pressure.hpa", "Phase", "temp.C", "DO.mgL")
d <- get.witrox.data("fishMR.txt", lines.skip = 10, delimit = "tab", choose.names = TRUE, chosen.names = the.chosen.ones, format = "%d/%m/%Y %I:%M:%S %p")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.