r - 拆分数据框 R

Question

我显然是在错误地处理这个问题，所以寻找一些建议（这里是新手 R 程序员......）需要将 AFINN 单词列表的数据框拆分为两个新向量（一个用于肯定词，一个用于否定词） . 我使用了子集，但这里有几行。将这些线组合成一条线的更好方法是什么？

# read the "AFINN" dataset and assign it into a variable called "AFINN"
AFINN <- read.delim("AFINN.txt", header=FALSE)
AFINN
# change column names to "Word" and "Score"
colnames(AFINN) <- c("Word","Score")
#split the AFINN data frame up into positive and negative word vectors
posAFINN <- subset(AFINN, Score >= 0)
posAFINN <- posAFINN[,-2]
posAFINN

negAFINN <- subset(AFINN, Score <= 0)
negAFINN <- negAFINN[,-2]
negAFINN

标签： r

Answer 1

基数 R：

posAFINN <- AFINN$Word[AFINN$Score > 0]
negAFINN <- AFINN$Word[AFINN$Score < 0]

下载：

library(dplyr)
posAFINN <- AFINN %>%
    filter(Score > 0) %>%
    pull(Word)

negAFINN <- AFINN %>%
    filter(Score < 0) %>%
    pull(Word)