R CMD check cleanup

Author: daroczig

DESCRIPTION

@@ -14,6 +14,7 @@ Date: 2018-08-06
 URL: https://github.com/daroczig/fbRads
 License: AGPL-3
 Imports:
+    stats,
     RCurl,
     jsonlite,
     digest,

NAMESPACE

@@ -63,6 +63,7 @@ importFrom(jsonlite,toJSON)
 importFrom(jsonlite,unbox)
 importFrom(jsonlite,validate)
 importFrom(plyr,ldply)
+importFrom(stats,setNames)
 importFrom(utils,URLdecode)
 importFrom(utils,URLencode)
 importFrom(utils,assignInMyNamespace)

R/fb_ad.R

@@ -12,7 +12,6 @@ fbad_create_ad <- function(fbacc,
                            name,
                            adset_id,
                            creative_id,
-                           adgroup_status = c('ACTIVE', 'PAUSED'),
                            status = c('ACTIVE', 'PAUSED'),...) {
 
     fbacc <- fbad_check_fbacc()

R/fb_audience.R

@@ -4,6 +4,7 @@
 #' @param name string
 #' @param description optional string
 #' @param opt_out_link optional link
+#' @param subtype audience type
 #' @return custom audience ID
 #' @export
 fbad_create_audience <- function(fbacc, name, description, opt_out_link,

R/fb_insights.R

@@ -18,7 +18,8 @@
 #' list.stack(list.select(l, date_start, date_stop, ad_id, adset_id, impressions))
 #'
 #' ## get given list of fields and transform to tabular data
-#' l <- fb_insights(date_preset = 'today', level = 'ad', fields = toJSON(c('impressions', 'total_actions')))
+#' l <- fb_insights(date_preset = 'today', level = 'ad',
+#'        fields = toJSON(c('impressions', 'total_actions')))
 #' data.table::rbindlist(l)
 #' }
 fb_insights <- function(fbacc, target = fbacc$acct_path, job_type = c('sync', 'async'), retries = 0, simplify = TRUE, ...) {

R/helpers.R

@@ -23,6 +23,7 @@ this_function_name <- function() {
 #' @param url string
 #' @return list
 #' @keywords internal
+#' @importFrom stats setNames
 url_parse <- function(url) {
 
     schema <- sub('^(http[s]).*', '\\1', url)