Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/73.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
R 在处理新的动态数据帧时,如何永久保存对列类型的更改_R_Dataframe_Dynamic - Fatal编程技术网

R 在处理新的动态数据帧时,如何永久保存对列类型的更改

R 在处理新的动态数据帧时,如何永久保存对列类型的更改,r,dataframe,dynamic,R,Dataframe,Dynamic,我正在尝试做这个脚本显示的事情 DF_Data$`Date [MM/DD/YY]`<- as.Date( get(paste(x,"_Data",sep=""))$`Date [MM/DD/YY]` ) DF_Data$`Date[MM/DD/YY]`这里,我们可能需要assign而不是get x <- "DF" obj_nm <- paste0(x, '_Data') assign(obj_nm, `[<

我正在尝试做这个脚本显示的事情

DF_Data$`Date [MM/DD/YY]`<-    as.Date( get(paste(x,"_Data",sep=""))$`Date [MM/DD/YY]` )

DF_Data$`Date[MM/DD/YY]`这里,我们可能需要
assign
而不是
get

x <- "DF"
obj_nm <- paste0(x, '_Data')
assign(obj_nm, `[<-`(get(obj_nm), "Date [MM/DD/YY]",
     value = as.Date(get(obj_nm)[['Date [MM/DD/YY]']])))
数据
set.seed(24)

DF_Data我又加了两个右括号,下标超出了范围。我将继续玩它,看看会发生什么。@user35131我创建了一个可复制的小示例,该示例可以很好地处理代码。在我的早期版本中,我错过了一个
。现在,它被更正了。分配(粘贴(x,“_Data”,sep=“”),
[@user35131你能用该代码更新你的帖子吗?因为很难从评论中知道,因为反引号是removed@user35131我更新了示例。请检查。它对我来说运行良好
x <- "DF"
obj_nm <- paste0(x, '_Data')
assign(obj_nm, `[<-`(get(obj_nm), "Date [MM/DD/YY]",
     value = as.Date(get(obj_nm)[['Date [MM/DD/YY]']])))
str(DF_Data)
#'data.frame':  2 obs. of  2 variables:
#$ Date [MM/DD/YY]: Date, format: "2015-10-25" "2018-05-26"
#$ val            : num  -0.546 0.537
set.seed(24)
DF_Data <- data.frame(`Date [MM/DD/YY]` = c("2015-10-25", "2018-05-26"),
             val = rnorm(2), check.names = FALSE)