R/convertTime.R
In CenterForAssessment/SGP: Student Growth Percentiles & Percentile Growth Trajectories
Defines functions
`convertTime`
`convertTime` <-
function(tmp.time) {
tmp <- tail(c(0, 0, 0, as.numeric(unlist(strsplit(tmp.time, ":")))), 4)
tmp.label <- c("Day", "Hour", "Minute", "Second")
tmp.label[which(tmp!=1)] <- paste0(tmp.label, "s")[which(tmp!=1)]
return(paste(paste(tmp[tmp!=0], tmp.label[tmp!=0]), collapse=", "))
} ### END convertTime
CenterForAssessment/SGP documentation built on March 12, 2024, 9:43 a.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Defines functions `convertTime`
`convertTime` <-
function(tmp.time) {
tmp <- tail(c(0, 0, 0, as.numeric(unlist(strsplit(tmp.time, ":")))), 4)
tmp.label <- c("Day", "Hour", "Minute", "Second")
tmp.label[which(tmp!=1)] <- paste0(tmp.label, "s")[which(tmp!=1)]
return(paste(paste(tmp[tmp!=0], tmp.label[tmp!=0]), collapse=", "))
} ### END convertTime
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.