Skip to content
Snippets Groups Projects
Commit 1fc09a56 authored by David Fuhry's avatar David Fuhry :fist:
Browse files

Resolve "Add imports from utils"

parent 10013fb8
No related branches found
No related tags found
No related merge requests found
...@@ -26,5 +26,7 @@ Imports: ...@@ -26,5 +26,7 @@ Imports:
WikipediR, WikipediR,
reticulate, reticulate,
cleanNLP, cleanNLP,
magrittr,
utils
Suggests: Suggests:
testthat testthat
...@@ -9,3 +9,5 @@ export(get_no_of_spouses) ...@@ -9,3 +9,5 @@ export(get_no_of_spouses)
export(init_nlp) export(init_nlp)
importFrom(data.table,"%like%") importFrom(data.table,"%like%")
importFrom(magrittr,"%>%") importFrom(magrittr,"%>%")
importFrom(utils,URLdecode)
importFrom(utils,write.table)
...@@ -7,4 +7,8 @@ ...@@ -7,4 +7,8 @@
#' @importFrom data.table %like% #' @importFrom data.table %like%
#' @importFrom magrittr %>% #' @importFrom magrittr %>%
NULL #' @importFrom utils URLdecode write.table
\ No newline at end of file NULL
# Make R CMD check happy
if(getRversion() >= "2.15.1") utils::globalVariables(c("."))
...@@ -4,7 +4,7 @@ ...@@ -4,7 +4,7 @@
\alias{get_birthplace} \alias{get_birthplace}
\title{This script extracts Birthplace from physicist texts \title{This script extracts Birthplace from physicist texts
Try to get the infobox and extract the birthplace Try to get the infobox and extract the birthplace
If there is no infobox, 0 will be returned as If there is no infobox, NA will be returned as
birthplace is hard to extract from text} birthplace is hard to extract from text}
\usage{ \usage{
get_birthplace(article) get_birthplace(article)
...@@ -18,6 +18,6 @@ String with birthplace of the physicist|0 ...@@ -18,6 +18,6 @@ String with birthplace of the physicist|0
\description{ \description{
This script extracts Birthplace from physicist texts This script extracts Birthplace from physicist texts
Try to get the infobox and extract the birthplace Try to get the infobox and extract the birthplace
If there is no infobox, 0 will be returned as If there is no infobox, NA will be returned as
birthplace is hard to extract from text birthplace is hard to extract from text
} }
...@@ -21,6 +21,6 @@ articles <- get_data() ...@@ -21,6 +21,6 @@ articles <- get_data()
no.spouses <- get_no_of_spouses(articles$Text[54]) no.spouses <- get_no_of_spouses(articles$Text[54])
no,spouses no.spouses
} }
} }
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment