Nothing
test.data.checks <- function() {
# failing on WINDOWS: "TS-Toronto" case
#datasets <- c("TS-all","TS-confirmed","TS-confirmed-US","TS-Toronto","aggregated")
datasets <- c("TS-all","TS-confirmed","TS-confirmed-US","aggregated")
for (i in datasets) {
print(i)
data <- covid19.data(i)
nullify.data(data)
nullify.data(data, stringent=TRUE)
print(paste(rep("#",80),collapse=''))
}
}
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.