yt <- CF$y$tsfc_feb$s$data$time
# [POSIXct] SAT snapshot times
yt <- yt[yt > CF$staT & yt < CF$endT]
CF$runtimes <- c(CF$staT, yt) # POSIXct
rm(yt)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.