dplyr case_when оператор со списком символов - PullRequest
Новая
       12

dplyr case_when оператор со списком символов

0 голосов
/ 25 января 2019

У меня есть список с 31 именем сайта. 

> typeof(Asites)
[1] "list"
> str(Asites)
Classes ‘tbl_df’, ‘tbl’ and 'data.frame':   31 obs. of  1 variable:
 $ Asites: chr  "45.88:-64.35" "45.88:-64.37" "45.89:-64.33" "45.89:-64.34" ...

Я хотел бы написать заявление case_when, чтобы изменить имя всех этих сайтов на одно и то же значение в моем фрейме данных.Однако, поскольку информация хранится в списке, я получаю следующее сообщение об ошибке: 

df %>%
  mutate(site2 = case_when(site %in% Asites ~ "A", 
                           TRUE ~ "B"))
Error in mutate_impl(.data, dots) : 
  Evaluation error: operations are possible only for numeric, logical or complex types.

Как я могу изменить Asites, чтобы это работало?

EDIT (1/25/18):

Поскольку у меня в df более 9 миллионов наблюдений, я только что предоставил dput для df $ site и Asites. 

dput(df$site[1:1000])
c("BennettMeadow", "BennettMeadow", "BennettMeadow", "BennettMeadow", 
"BennettMeadow", "BennettMeadow", "BennettMeadow", "BennettMeadow", 
"BennettMeadow", "BennettMeadow", "BennettMeadow", "BennettMeadow", 
"BennettMeadow", "BennettMeadow", "BennettMeadow", "BennettMeadow", 
"BennettMeadow", "BennettMeadow", "BennettMeadow", "BennettMeadow", 
"BennettMeadow", "BennettMeadow", "BennettMeadow", "BennettMeadow", 
"BennettMeadow", "BennettMeadow", "BennettMeadow", "BennettMeadow", 
"BennettMeadow", "BennettMeadow", "BennettMeadow", "BennettMeadow", 
"BennettMeadow", "BennettMeadow", "BennettMeadow", "BennettMeadow", 
"BennettMeadow", "BennettMeadow", "BennettMeadow", "BennettMeadow", 
"BennettMeadow", "BennettMeadow", "BennettMeadow", "BennettMeadow", 
"BennettMeadow", "BennettMeadow", "BennettMeadow", "BennettMeadow", 
"BennettMeadow", "BennettMeadow", "BennettMeadow", "BennettMeadow", 
"BennettMeadow", "BennettMeadow", "BennettMeadow", "BennettMeadow", 
"BennettMeadow", "BennettMeadow", "BennettMeadow", "BennettMeadow", 
"NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", 
"NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", 
"NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", 
"NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", 
"NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", 
"NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", 
"NA:NA", "NA:NA", "NA:NA", "NA:NA", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", 
"NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", 
"NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", 
"NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", 
"NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", 
"NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", 
"NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.9:-64.36", "45.9:-64.36", 
"45.9:-64.36", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.35", "45.91:-64.35", "45.91:-64.35", 
"45.91:-64.35", "45.91:-64.35", "45.89:-64.34", "45.89:-64.34", 
"45.89:-64.34", "45.89:-64.34", "45.89:-64.34", "45.89:-64.34", 
"45.89:-64.34", "45.89:-64.34", "45.89:-64.34", "45.89:-64.34", 
"45.89:-64.34", "45.89:-64.34", "45.89:-64.34", "45.89:-64.34", 
"45.89:-64.34", "45.89:-64.34", "45.89:-64.34", "45.89:-64.34", 
"45.89:-64.34", "45.89:-64.34", "45.89:-64.34", "45.89:-64.34", 
"45.89:-64.34", "45.9:-64.32", "45.9:-64.32", "45.89:-64.33", 
"45.89:-64.33", "45.89:-64.33", "45.89:-64.33", "45.89:-64.33", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.34", "45.91:-64.34", "45.91:-64.34", "45.91:-64.34", 
"45.91:-64.35", "45.91:-64.35", "45.91:-64.35", "45.91:-64.35", 
"45.91:-64.35", "45.89:-64.34", "45.89:-64.34", "45.89:-64.34", 
"45.89:-64.34", "45.89:-64.34", "45.89:-64.34", "45.89:-64.34", 
"45.89:-64.34", "45.89:-64.34", "45.89:-64.34", "45.89:-64.34", 
"45.89:-64.34", "45.89:-64.34", "45.89:-64.34", "45.89:-64.34", 
"45.89:-64.34", "45.89:-64.34", "45.89:-64.34", "45.89:-64.34", 
"45.89:-64.34", "45.9:-64.32", "45.9:-64.32", "45.89:-64.33", 
"45.89:-64.33", "45.89:-64.33", "45.89:-64.33", "45.89:-64.33", 
"NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", 
"NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", 
"NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", 
"NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", 
"45.9:-64.34", "45.9:-64.34", "45.9:-64.34", "45.9:-64.34", "45.9:-64.34", 
"45.9:-64.34", "45.9:-64.34", "45.9:-64.34", "45.9:-64.34", "45.9:-64.34", 
"45.9:-64.34", "45.9:-64.34", "45.9:-64.34", "45.9:-64.34", "45.9:-64.34", 
"45.9:-64.34", "45.9:-64.34", "45.9:-64.34", "45.9:-64.34", "45.9:-64.34", 
"45.9:-64.34", "45.9:-64.34", "45.9:-64.34", "45.9:-64.34", "45.9:-64.34", 
"45.9:-64.34", "45.9:-64.34", "45.9:-64.34", "45.9:-64.34", "45.9:-64.34", 
"45.9:-64.34", "45.9:-64.34", "45.9:-64.34", "45.9:-64.34", "45.9:-64.34", 
"45.9:-64.34", "NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", 
"NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", 
"NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", 
"NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", "NA:NA", 
"NA:NA", "45.9:-64.34", "45.9:-64.34", "45.9:-64.34", "45.9:-64.34", 
"45.9:-64.34", "45.9:-64.34", "45.9:-64.34", "45.9:-64.34", "45.9:-64.34", 
"45.9:-64.34", "45.9:-64.34", "45.9:-64.34", "45.9:-64.34", "45.9:-64.34", 
"45.9:-64.34", "45.9:-64.34", "45.9:-64.34", "45.9:-64.34", "45.9:-64.34", 
"45.9:-64.34", "45.9:-64.34", "45.9:-64.34", "45.9:-64.34", "45.9:-64.34", 
"45.9:-64.34", "45.9:-64.34", "45.9:-64.34", "45.9:-64.34", "45.9:-64.34", 
"45.9:-64.34", "45.9:-64.34", "45.9:-64.34", "45.9:-64.34", "45.9:-64.34", 
"45.9:-64.34", "45.9:-64.34", "45.91:-64.33", "45.91:-64.33", 
"45.91:-64.33", "45.91:-64.33", "45.91:-64.33", "45.91:-64.33", 
"45.91:-64.33", "45.91:-64.33", "45.91:-64.33", "45.91:-64.33", 
"45.91:-64.33", "45.91:-64.33", "45.91:-64.33", "45.91:-64.33", 
"45.91:-64.33", "45.91:-64.33", "45.91:-64.33", "45.91:-64.33", 
"45.91:-64.33", "45.91:-64.33", "45.91:-64.33", "45.91:-64.33", 
"45.91:-64.33", "45.91:-64.33", "45.91:-64.33", "45.91:-64.33", 
"45.91:-64.33", "45.91:-64.33", "45.91:-64.33", "45.91:-64.33", 
"45.91:-64.33", "45.91:-64.33", "45.91:-64.33", "45.91:-64.33", 
"45.92:-64.33", "45.92:-64.33", "45.92:-64.33", "45.92:-64.33", 
"45.92:-64.33", "45.91:-64.33", "45.91:-64.33", "45.91:-64.33", 
"45.91:-64.33", "45.91:-64.33", "45.91:-64.33", "45.91:-64.33", 
"45.91:-64.33", "45.91:-64.33", "45.91:-64.33", "45.91:-64.33", 
"45.91:-64.33", "45.91:-64.33", "45.91:-64.33", "45.91:-64.33", 
"45.91:-64.33", "45.91:-64.33", "45.91:-64.33", "45.91:-64.33", 
"45.91:-64.33", "45.91:-64.33", "45.91:-64.33", "45.91:-64.33", 
"45.91:-64.33", "45.91:-64.33", "45.91:-64.33", "45.91:-64.33", 
"45.91:-64.33", "45.91:-64.33", "45.91:-64.33", "45.91:-64.33", 
"45.91:-64.33", "45.91:-64.33", "45.91:-64.33", "45.92:-64.33", 
"45.92:-64.33", "45.92:-64.33", "45.92:-64.33", "45.92:-64.33", 
"45.91:-64.33", "45.91:-64.33", "45.91:-64.33", "45.91:-64.33", 
"45.91:-64.33", "45.91:-64.33", "45.91:-64.33", "45.91:-64.33", 
"45.91:-64.33", "45.91:-64.33", "45.91:-64.33", "45.91:-64.33", 
"45.91:-64.33", "45.91:-64.33", "45.91:-64.33", "45.9:-64.33", 
"45.9:-64.33", "45.9:-64.33", "45.9:-64.33", "45.9:-64.33", "45.9:-64.33", 
"45.9:-64.33", "45.9:-64.33", "45.9:-64.33", "45.9:-64.33", "45.9:-64.33", 
"45.9:-64.33", "45.9:-64.33", "45.9:-64.33", "45.9:-64.33", "45.9:-64.33", 
"45.9:-64.33", "45.9:-64.33", "45.9:-64.34", "45.9:-64.34", "45.9:-64.34", 
"45.9:-64.34", "45.9:-64.34", "45.9:-64.34", "45.9:-64.34", "45.9:-64.34", 
"45.9:-64.34", "45.9:-64.34", "45.9:-64.34", "45.9:-64.34", "45.9:-64.34", 
"45.9:-64.34", "45.9:-64.34", "45.9:-64.34", "45.9:-64.34", "45.9:-64.34", 
"45.9:-64.34", "45.9:-64.34", "45.9:-64.34", "45.9:-64.34", "45.9:-64.34", 
"45.9:-64.34", "45.9:-64.34", "45.9:-64.34", "45.9:-64.34", "45.9:-64.34", 
"45.9:-64.34", "45.9:-64.34", "45.9:-64.34", "45.9:-64.34", "45.9:-64.33", 
"45.9:-64.33", "45.9:-64.33", "45.9:-64.33", "45.9:-64.33", "45.9:-64.33", 
"45.9:-64.33", "45.9:-64.33", "45.9:-64.33", "45.9:-64.33", "45.9:-64.33", 
"45.9:-64.33", "45.9:-64.33", "45.9:-64.33", "45.9:-64.33", "45.9:-64.33", 
"45.9:-64.33", "45.9:-64.33", "45.9:-64.33", "45.91:-64.33", 
"45.91:-64.33", "45.91:-64.33", "45.91:-64.33", "45.91:-64.33", 
"45.91:-64.33", "45.91:-64.33", "45.91:-64.33", "45.91:-64.33", 
"45.91:-64.33", "45.91:-64.33", "45.91:-64.33", "45.91:-64.33", 
"45.91:-64.33", "45.91:-64.33", "45.9:-64.33", "45.9:-64.33", 
"45.9:-64.33")

dput(Asites)
structure(list(recvDeployName = c("45.88:-64.35", "45.88:-64.37", 
"45.89:-64.33", "45.89:-64.34", "45.89:-64.35", "45.89:-64.36", 
"45.9:-64.32", "45.9:-64.33", "45.9:-64.34", "45.9:-64.35", "45.9:-64.36", 
"45.9:-64.37", "45.91:-64.32", "45.91:-64.33", "45.91:-64.34", 
"45.91:-64.35", "45.91:-64.36", "45.92:-64.33", "45.92:-64.34", 
"45.92:-64.35", "Bridge St Sackville (SHEEP)", "COLONY", "COLONY1 ", 
"COLONY2", "COLONY2", "DIKES", "HWY", "LOWERW", "RCI Sackville", 
"Sackville Eng", "SCHOOL", "SE", "SE")), row.names = c(NA, -33L
), class = c("tbl_df", "tbl", "data.frame"))

1 Ответ

0 голосов
/ 26 января 2019

Это то, что я пытался сообщить вчера: 

library(dplyr)

df %>%
  mutate(site2 = case_when(site %in% unlist(Asites) ~ "A", 
                           TRUE ~ "B")) %>%
  with(table(site2)) # just to show the breakdown of site2's contents, you'd drop this line IRL

# result
site2
A   B 
792 208

Мне кажется, что он работает с использованием dplyr_0.7.8.

Эта стратегия работает только тогда, когда фрейм опорных данных Asites, имеет только значения местоположения.Если во фрейме справочных данных больше, чем просто местоположения, вы можете использовать справку Asites$recvDeployName (как предлагает avid_useR) для проверки только по определенному столбцу.

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.

Похожие темы

...