Как извлечь все твиты из фрейма данных, заданного символьным вектором «user_id_str» в R

Question

введите описание изображения здесь. Извлечены твиты из Twitter Streaming API в R в течение недели между определенными таймфреймами. У меня есть кадр данных из 42 переменных, один из которых - user_id_str. Он имеет тип Character. У меня есть вектор символов идентификаторов пользователя со мной. То, что я хочу сделать, это получить все твиты, связанные с идентификаторами пользователя в символьном векторе. Я уверен, что все идентификаторы пользователей в символьном векторе также присутствуют в фрейме данных.

timeframe_tue - это набор данных, в котором есть все твиты вторника с 11:00 до 13:00.

common_users является символом вектор с идентификаторами пользователей я заинтересован. Он имеет длину 93

Я попытался запустить следующую команду, и я получил фрейм данных полностью НАН Украины с таким же числом столбцов, как timeframe_tue и 93 строки.

com_tue <- timeframe_tue[timeframe_tue$user_id_str[common_user],] 

timeframe_tue[,"user_id_str"][user_count] –– this didn't work either 

timeframe_tue$user_id_str[timeframe_tue$user_id_str==user_count]–– Neither did this. 

This is a sample of how my data frame looks like:

Может кто-то помочь мне понять эту проблему?

Answer 1

Вы можете использовать очень быстро решение, основанное на data.table

# load library 
library(data.table) 

# convert yout data.frame to data.table to speed up the process 
    setDT(timeframe_tue) 


# filter 
    timeframe_tue[ user_id_str %in% common_user, ] 

Вы также можете использовать оператор %in%, чтобы исправить свое решение, как это:

timeframe_tue[ timeframe_tue$user_id_str %in% common_user, ] 

Answer 2

Вот dplyr решение. Вы действительно ищете правильный синтаксис «% in%».

library(dplyr) 

timeframe_tue = tbl_df(timeframe_tue)  

timeframe_tue %>% filter(user_id_str %in% common_user)