首页 > 解决方案 > 如何将属性从数据框复制到另一个数据框

问题描述

我的最后一个问题之后,我有这样的数据框:

data_pangan

我也有这样的数据:

我的数据

我需要来自“my_data”的数据:

我需要的数据

如果“my_data”中不存在该属性,如何将“data_pangan”属性复制到“my_data”?以及如何将值设置为“否”?

标签: r

解决方案


我们可以使用setdiff查找不在“my_data”中的列名并将其分配给“no”

my_data[setdiff(names(data_pangan)[-1], names(my_data[-1]))] <- "no"
my_data
#  id_kategori Ekstruksi Permisahan Pendinginan Pemotogan Pengeringan
#1           1        no        yes          no        no          no

数据

data_pangan <- structure(list(id_kategori = 1:3, Ekstruksi = c("yes", "no", 
"yes"), Permisahan = c("no", "yes", "no"), Pendinginan = c("yes", 
"yes", "no"), Pemotogan = c("yes", "no", "no"), Pengeringan = c("no", 
"no", "yes")), class = "data.frame", row.names = c(NA, -3L))

my_data <- structure(list(id_kategori = 1, Ekstruksi = "no", Permisahan = "yes"),
class = "data.frame", row.names = c(NA, 
-1L))

推荐阅读