Skip to content

Instantly share code, notes, and snippets.


Block or report user

Report or block sjkiss

Hide content and notifications from this user.

Learn more about blocking users

Contact Support about this user’s behavior.

Learn more about reporting abuse

Report abuse
View GitHub Profile
sjkiss / stats_can_help.R
Created Jan 16, 2019
Error in Statistics Canada's Web Data Service
View stats_can_help.R
#This is the sample URL from your web data help page.
#This returns an unexpected character
View chemicals_management_scrape.R
#Load two libraries
#Paste the digit 1 thru 12 into the base URL to create 12 separate URLs, one each for a batch
urls<-lapply(seq(1,12, 1), function(x) paste('',x,'/index-eng.php', sep=''))
#read the html code from each batch home page
sjkiss / package_install
Last active Aug 29, 2015
Install key packages for LSIRM
View package_install
#Packages to be installed
to.install<-c('car', 'plotrix', 'psych')
#Determine Uninstalled Packages
new.packages <- to.install[!(to.install %in% installed.packages()[,"Package"])]
#If the number of uninstalled packages is non-zero, install uninstalled packages
if(length(new.packages)) install.packages(new.packages)
You can’t perform that action at this time.