mkearney/nytimes

nytimes: Interacting with New York TImes APIs

nytimes

• R functions for accessing New York Times’ APIs
• Functionality currently extends to “article search”, “most popular”, and “Times newswire” APIs.

Authorizing API access

• Use code below to create environment variable to store your api key, which you can acquire here: https://developer.nytimes.com/signup

## replace x's with nytimes article search API key which
##    you can acquire by visiting the following URL:
##    https://developer.nytimes.com/signup
apikey <- paste0("NYTIMES_KEY=", "xxxxxxxxxxxxxxxxxxxxxxxxxxxx")

## make path to .Renviron
file <- file.path(path.expand("~"), ".Renviron")

## save environment variable
cat(apikey, file = file, append = TRUE, fill = TRUE)

Using nytimes package

Install package

install.packages("devtools")
devtools::install_github("mkearney/nytimes")

Load package

## load nytimes package
library(nytimes)

Examples

Article Search API

## get http response objects for search about sanctions
nytsearch <- nyt_search("sanctions", n = 2000)

## convert response object to data frame
nytsearchdf <- as.data.frame(nytsearch)

## preview data
head(nytsearchdf, 10)

Most Popular API

## get data for most popular stories
nytpop <- nyt_mostpopular(metric = "mostshared",
                          section = "U.S.")

## convert response object to data frame
nytpopdf <- as.data.frame(nytpop)

## preview data
head(nytpopdf)

## get media for each observation
get_media(nytpopdf)

Times Newswire API

## get data from the Times newswire
nytwire <- nyt_timeswire(src = "all",
                         section = "all")

## convert response object to data frame
nytwiredf <- as.data.frame(nytwire)

## preview data
head(nytwiredf)

About

• These functions were created during the Big Dynamic Data working group sponsored by the Center for Research Methods & Data Analysis at the University of Kansas.

nytimes's Issues

Error: couldn't find NYTIMES_KEY environment variable

I followed the first steps to set up the environment as follows:

apikey <- paste0("NYTIMES_KEY=", "mykey____")
file <- file.path(path.expand("~"), ".Renviron")
cat(apikey, file = file, append = TRUE, fill = TRUE)
install.packages("devtools")
devtools::install_github("mkearney/nytimes")
library(nytimes)
nytsearch <- nyt_search("multiculturalism", n = 2000)

But I got this error: Error: couldn't find NYTIMES_KEY environment variable

What have I done wrong?