This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#To run 2017 caRd quickly. | |
require(RCurl) | |
myscript <- getURL("https://raw.githubusercontent.com/cmtucker/EEB-FlowMisc/master/2017caRd_script.R", ssl.verifyhost=FALSE, ssl.verifypeer=FALSE) | |
source(textConnection(myscript)) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#################EEB & Flow 2017 caRd | |
#First choose how to get the data: | |
#IF you chose to download the data file already, make sure you have the local file pathway correctly here: | |
# csv file available at: https://github.com/cmtucker/EEB-FlowMisc/blob/master/2017caRd_data.csv | |
#myfile <- "2017caRd_data.csv" | |
#newImage <- read.csv(myfile, header=TRUE) | |
#OR, use RCurl package to download it directly from github |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
if( ! require( "circlize" , character.only = TRUE ) ){ | |
# If package was not able to be loaded then re-install | |
install.packages( "circlize" , dependencies = TRUE ) | |
# Load package after installing | |
require( "circlize" , character.only = TRUE ) | |
} | |
rm(list=ls()) | |
####Start |