如何从data frame拆分得到的向量中提取仅汽车品牌数据

解决方法 #

你拆分后得到的第16列是列表类型，每个列表元素对应的拆分向量第一个位置就是汽车品牌，直接提取每个向量的首元素即可，以下是两种常用实现方式：

方式1：tidyverse生态（purrr包） #

library(purrr)
# 新增brand列存储提取的品牌
usedcars$brand <- map_chr(usedcars[[16]], ~ .x[1])

方式2：Base R原生实现 #

usedcars$brand <- sapply(usedcars[[16]], function(x) x[1])

验证结果 #

执行usedcars[1:4, "brand"]即可得到前4行的品牌数据，输出如下：

[1] "Hyundai"    "Hyundai"    "Volkswagen" "Maruti"

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