R 函数从列中删除数据

Question

截图 我复制的表中有 2 列，我需要删除列逗号后面的数据和另一列逗号前面的数据。

我附上了数据框的屏幕截图。第 2 列（板号）需要删除逗号之后的所有内容，第 3 列（孔位置）需要删除逗号之前的所有内容。

我尝试过 gsub 函数，但它只是删除了逗号。

ssp_data_subset_2_df$Plate_number <- gsub(pattern = ",*",replacement = "", ssp_data_subset_2_df$Plate_number)

Answer 1

使用任意一种方法：

1. 字符串分割：

message <-"Plate 1, A1"
# print(message)
msg <- strsplit(message, ",")
firstEle <- sapply(msg, `[`, 1)
lastEle <- sapply(msg, `[`, 2)
print(firstEle)
print(lastEle)

2. 使用正则表达式

message <-"Plate 1, A1"
# print(message)
firstPart <- sub("[, ]+[a-zA-Z0-9]+$", "", message)
lastPart <- sub("^[a-zA-Z0-9 ]+[, ]+", "", message)
print(firstPart)
print(lastPart)

实时代码：programiz.com