Time2Classification=function(OrderedTimeChar){
n=length(OrderedTimeChar)
y=as.character(OrderedTimeChar)
u=unique(y)
Cls=rep(NaN,n)
for(i in 1:length(u)){
Cls[y==u[i]]=i
}
return(Cls)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.