data-raw/small-example-data.R
In knapply/tweetio: Really, Really, Ridiculously Fast I/O, Transformation, and Analytical Routines Twitter Data
raw_lines <- readLines("inst/example-data/api-stream.json.gz")
clean_lines <- raw_lines[
vapply(raw_lines, function(.x) {
nchar(.x) > 0L &&
grepl('^\\{"created_at"', .x) &&
grepl('bounding_box', .x) &&
jsonify::validate_json(.x)
}, logical(1L))
]
dest_path <- "inst/example-data/api-stream-small.json"
writeLines(clean_lines, dest_path)
knapply/tweetio documentation built on Dec. 22, 2020, 7:15 p.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
raw_lines <- readLines("inst/example-data/api-stream.json.gz")
clean_lines <- raw_lines[
vapply(raw_lines, function(.x) {
nchar(.x) > 0L &&
grepl('^\\{"created_at"', .x) &&
grepl('bounding_box', .x) &&
jsonify::validate_json(.x)
}, logical(1L))
]
dest_path <- "inst/example-data/api-stream-small.json"
writeLines(clean_lines, dest_path)
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.