Ошибка неиспользованного аргумента при создании таблицы Tibble - PullRequest
Новая
       12

Ошибка неиспользованного аргумента при создании таблицы Tibble

0 голосов
/ 25 февраля 2020

Я работаю с этими данными: 

library("RCurl")
library("plm")
library("tibble")
library("dplyr")
library("car")
library("AER")
library("arm")
library("broom")

x <- getURL("https://raw.githubusercontent.com/dothemathonthatone/maps/master/main_merge1.csv")
maindf <- read.csv(text = x)

Я пытаюсь сделать что-то очень простое: 

data <- maindf %>% as_tibble() %>% select(reg_schl, year, age_group, fee_monthly, daily_hours, fee_per_inc, deubthrt_total) %>% print()

Я получаю следующую ошибку: 

Error in select(., reg_schl, year, age_group, fee_monthly, daily_hours, : unused arguments (reg_schl, year, age_group, fee_monthly, daily_hours, fee_per_inc, deubthrt_total)
Traceback:

1. maindf %>% as_tibble() %>% select(reg_schl, year, age_group, 
 .     fee_monthly, daily_hours, fee_per_inc, deubthrt_total) %>% 
 .     print()
2. withVisible(eval(quote(`_fseq`(`_lhs`)), env, env))
3. eval(quote(`_fseq`(`_lhs`)), env, env)
4. eval(quote(`_fseq`(`_lhs`)), env, env)
5. `_fseq`(`_lhs`)
6. freduce(value, `_function_list`)
7. function_list[[i]](value)

Итак, я попробовал тот же код, используя данные R: 

data(Fatalities, package = "AER")
road <- Fatalities %>%
as_tibble() %>%
select(state, year, beertax, fatal, pop) %>%
print()

и получил ту же ошибку.

1 Ответ

1 голос
/ 25 февраля 2020

При загрузке library(ARM) вы должны увидеть следующее сообщение:

Загрузка необходимого пакета: MASS

Присоединение пакета: 'MASS'

Следующее объект маскируется из пакета: dplyr: 

select

Это означает, что при вызове select вы используете MASS::select, а не dplyr::select

. Вы могли бы быть явными и выполнить: 

maindf %>% as_tibble() %>% 
  dplyr::select(reg_schl, year, age_group, fee_monthly, daily_hours, 
                fee_per_inc, deubthrt_total)

Столкновения между MASS::select и dplyr::select очень распространены. Вы также можете переопределить select, чтобы использовать dplyr::select, используя: select <- dplyr::select, чтобы сохранить набор текста.

...