install.packages("rnoaa")
library(rnoaa)ids <- c("ASN00095063", "ASN00024025", "ASN00040112", "ASN00041023",
"ASN00009998", "ASN00066078", "ASN00003069", "ASN00090162",
"ASN00040126", "ASN00058161")
meteo_pull_monitors(monitors, var = c('prcp', 'tmax', 'tmin'))| library(ggplot2) | |
| library(dplyr) | |
| library(scales) | |
| # SAMPLE DATA | |
| set.seed(123) | |
| # get all dates in a range | |
| start_date <- as.Date("2017-01-01") | |
| end_date <- as.Date("2017-06-01") | |
| dates <- seq(start_date, end_date, 1) |
| # Get a person's name, location, summary, # of connections, and skills & endorsements from LinkedIn | |
| # URL of the LinkedIn page | |
| user_url <- "https://www.linkedin.com/in/daattali" | |
| # since the information isn't available without being logged in, the web | |
| # scraper needs to log in. Provide your LinkedIn user/pw here (this isn't stored | |
| # anywhere as you can see, it's just used to log in during the scrape session) | |
| username <- "yourusername" | |
| password <- "yourpassword" |
