如何提取数据框列中部分数据？如何拆分Player列实现格式转换？

Hey there! Let's break down your two R questions with clear examples, using your provided dataset as a reference.

There are a few common ways to pull specific subsets from a data frame column—here are the most useful ones:

• Extract by row position: Grab the first 5 entries from the Player column:

  # First 5 players
  df$Player[1:5]
  

• Extract by condition: Get players who played more than 100 games (G > 100):

  # Players with G > 100
  df$Player[df$G > 100]
  

• Extract matching a specific value: Pull players from the year 2002:

  # Players from 2002
  df$Player[df$Year == 2002]
  

Your Player column combines full names and IDs separated by a backslash (\). Let's split this into two separate columns. First, let's load your data properly:

df <- structure(list(Player = structure(c(7L, 16L, 13L, 9L, 12L, 15L, 11L, 6L, 2L, 3L, 10L, 8L, 4L, 1L, 5L, 14L), .Label = c("Alberto Castillo\\castial01", "B.J. Surhoff\\surhob.01", "Bobby Bonilla\\bonilbo01", "Chipper Jones\\jonesch06", "David Segui\\seguida01", "Eddie Perez\\perezed02", "Felix Jose\\josefe01", "Garret Anderson\\anderga01", "John McDonald\\mcdonjo03", "Keith Lockhart\\lockhke01", "Luis Gonzalez\\gonzalu01", "Mark Grace\\gracema01", "Matt Williams\\willima04", "Melvin Mora\\morame01", "Steve Finley\\finlest01", "Tony Clark\\clarkto02" ), class = "factor"), G = c(13L, 36L, 44L, 70L, 145L, 150L, 155L, 16L, 25L, 114L, 128L, 135L, 143L, 11L, 18L, 125L), Year = c(2002L, 2009L, 2003L, 2012L, 2001L, 2002L, 2005L, 2005L, 2002L, 2000L, 2002L, 2009L, 2009L, 2007L, 2004L, 2009L), Age = c(37L, 37L, 37L, 37L, 37L, 37L, 37L, 37L, 37L, 37L, 37L, 37L, 37L, 37L, 37L, 37L)), class = "data.frame", row.names = c(NA, -16L))

Method 1: Using tidyr (Tidyverse, most straightforward) #

This package makes column splitting super simple. If you don't have it installed yet, grab it first:

install.packages("tidyr")
library(tidyr)

# Split Player into Name and ID columns
df_split <- separate(df, Player, into = c("Name", "ID"), sep = "\\\\")

Note: We use \\\\ because backslashes are escape characters in regex—two are needed to match one actual backslash in your data.

Method 2: Base R (no extra packages needed) #

If you prefer not to load external packages, use strsplit:

# Convert Player from factor to character first
player_chars <- as.character(df$Player)
# Split each entry at the backslash
player_split <- strsplit(player_chars, "\\\\")
# Turn the split list into a data frame
player_df <- do.call(rbind.data.frame, player_split)
colnames(player_df) <- c("Name", "ID")
# Combine with the original non-Player columns
df_split_base <- cbind(player_df, df[, !names(df) %in% "Player"])

Both methods will give you a data frame with separate Name and ID columns, keeping all your original G, Year, and Age data intact.

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