R语言如何在已有Data Frame中新增变量？附SPSS代码示例

Hey there! Let’s translate your SPSS logic into R, focusing on adding new variables directly to an existing data frame—since the single-value if/else example you saw works for individual objects, but we need vectorized tools for data frames.

Base R Approaches #

These work without any extra packages, great if you’re sticking to core R:

1. Directly assign with $

You can add new columns one at a time using the $ operator. This modifies your data frame in place (no need to reassign unless you want to create a copy):

# Assume your data frame is named df
df$agegrp3335 <- ifelse(df$age %in% c(33, 34, 35), 1, NA)
df$age33 <- ifelse(df$age == 33, 1, NA)
df$age34 <- ifelse(df$age == 34, 1, NA)
df$age353 <- ifelse(df$age == 35, 1, NA)

• ifelse() is R’s vectorized conditional function— it checks every element of the age column, not just a single value (this matches how SPSS processes each case).
• %in% is a cleaner alternative to writing age == 33 | age == 34 | age == 35 for multiple matches.
• Using NA mimics SPSS’s default behavior of leaving non-matching cases as missing; swap it for 0 if you want non-matches to be 0 instead.

2. Use transform() for batch additions

If you want to add multiple variables in one go, transform() returns a modified data frame (just reassign it to your original object to update it):

df <- transform(df,
                agegrp3335 = ifelse(age %in% c(33, 34, 35), 1, NA),
                age33 = ifelse(age == 33, 1, NA),
                age34 = ifelse(age == 34, 1, NA),
                age353 = ifelse(age == 35, 1, NA))

Tidyverse (dplyr) Approach (Recommended by Hadley Wickham’s Tools) #

Since you referenced Hadley Wickham, let’s use dplyr::mutate()—this is the modern, readable way to manipulate data frames in R:

First, load the dplyr package (install it with install.packages("dplyr") if you haven’t):

library(dplyr)

Then use mutate() with the pipe operator (%>%) to chain operations:

df <- df %>%
  mutate(
    agegrp3335 = if_else(age %in% c(33, 34, 35), 1L, NA_integer_),
    age33 = if_else(age == 33, 1L, NA_integer_),
    age34 = if_else(age == 34, 1L, NA_integer_),
    age353 = if_else(age == 35, 1L, NA_integer_)
  )

• if_else() is a stricter, type-safe version of base R’s ifelse()—it ensures your new columns are integer type (using 1L for integer 1 and NA_integer_ for integer missing values, instead of mixing types).
• The pipe (%>%) makes the code read like plain English: "take df, then mutate it to add these variables".

Key Note vs. SPSS #

Unlike SPSS, you don’t need an EXECUTE command in R—assigning the modified data frame (either via $, transform(), or mutate()) applies the changes immediately.

内容的提问来源于stack exchange，提问作者John Wildman