Split Data Frame R

Question

I'm clearly going about this incorrectly, so looking for some advice (newbie R programmer here...) Need to split up a data frame of the AFINN word list into two new vectors (one for positive words and one for negative words). I used subset, but have a few lines here. What's a better way to combine these lines into one line?

# 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

Can it be >= and just <? If so split(AFINN$Word, AFINN$Score >= 0) will do it. Or lapply(split(AFINN, AFINN$Score >= 0), '[', -2, drop = FALSE) — Rui Barradas
– Rui Barradas, Commented Mar 22, 2019 at 16:50
split(AFINN$Word, sign(AFINN$Score)) is an alternative putting zero in a third vector. — Dan
– Dan, Commented Mar 22, 2019 at 16:53

Sonny · Accepted Answer · 2019-03-22 17:28:48Z

1

Base R:

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

Dplyr:

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

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

answered Mar 22, 2019 at 17:28

Sonny

3,1651 gold badge13 silver badges19 bronze badges

Sign up to request clarification or add additional context in comments.

Collectives™ on Stack Overflow

Split Data Frame R

1 Answer 1

Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

Comments

Your Answer

Sign up or log in

Post as a guest

Related