Conditionally replacing column values with data.table

Rdata.table

R Problem Overview


I have the following data.table:

dt <- data.table(col1 = rep("a",6), col2 = c(1,1,1,2,3,1))

Now I want to replace all the 1 in col2 with value "bigDog". I can do it using the data.frame spirit:

dt$col2[dt$col2==1,] <- "bigDog"

But I wonder if there is a different way, more "data.table oriented"?

R Solutions


Solution 1 - R

Had you not wanted to change the type of the column, you'd do:

dt[col2 == 1, col2 := 123]

With the type change, you can do:

dt[, col2 := as.character(col2)][col2 == "1", col2 := "bigDog"]

If you don't change the type first, "bigDog" will get coerced to integer, i.e. NA. You'll also get a bunch of warnings about that of course.

Note that besides less cumbersome syntax, using := has the advantage of not making extra copies of data (as <- will) and instead modifies in place.

Solution 2 - R

Aditionally you could use the library plyr

library(data.table)
library(plyr)
dt <- data.table(col1 = rep("a",6), col2 = c(1,1,1,2,3,1))
dt <- mapvalues(dt[,col2], c(1), c("BigDog"))

Attributions

All content for this solution is sourced from the original question on Stackoverflow.

The content on this page is licensed under the Attribution-ShareAlike 4.0 International (CC BY-SA 4.0) license.

Content TypeOriginal AuthorOriginal Content on Stackoverflow
QuestionColonel BeauvelView Question on Stackoverflow
Solution 1 - ReddiView Answer on Stackoverflow
Solution 2 - RjalazbeView Answer on Stackoverflow