Nothing
##Load libraries
library(spacetime)
library(trajectories)
##Load sample trajectory data
data(traj_sample)
##Convert sample data from list of STI into STTDF
sttdf <- STItoSTTDF(traj_sample)
##Check the results
class(sttdf)
#save(sttdf, file = "STItoSTTDFdemo2.Rout.save")
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.