Warning: file_get_contents(/data/phpspider/zhask/data//catemap/3/arrays/12.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中将数据帧或矩阵转换为Javascript数组?_Javascript_Arrays_R_Dataframe - Fatal编程技术网

如何在R中将数据帧或矩阵转换为Javascript数组?

如何在R中将数据帧或矩阵转换为Javascript数组?,javascript,arrays,r,dataframe,Javascript,Arrays,R,Dataframe,假设我有一个数据帧,如: df = data.frame(a=c(1,2,3),b=c(40,50,60),c=c(100,200,300)) 如何将其转换为包含Javascript数组的字符串,如: [[1, 2, 3], [40, 50, 60], [100, 200, 300]] 您可以这样做: jsstring = paste("var myarray = [", gsub('\\(','[', gsub('\\)',']',

假设我有一个数据帧,如:

 df = data.frame(a=c(1,2,3),b=c(40,50,60),c=c(100,200,300))
如何将其转换为包含Javascript数组的字符串,如:

 [[1, 2, 3], [40, 50, 60], [100, 200, 300]]
您可以这样做:

jsstring = paste("var myarray = [",
    gsub('\\(','[',
         gsub('\\)',']',
              gsub('c','',toString(df)))), "];")
没有正则表达式:

paste0("var myarray = [",paste0("[", apply(df, 2, function(x) paste0(x,"",collapse = ", ")),"]",collapse=", "),"];")
#[1] "var myarray = [[1, 2, 3], [40, 50, 60], [100, 200, 300]];"
//首先将数据帧转换为字符串(我不知道)
var myString=“a=c(1,2,3),b=c(40,50,60),c=c(100200300)”;
var newString=myString.replace(新RegExp(“\\”,“g”),“~~”)。replace(新RegExp(“\\”,“g”),“~~”;
var result=newString.split(“~~~”).filter(函数(num,index){if(index%2!==0)return num;}).map(函数(项){var arr=[];arr.push(项);return arr;})

log(JSON.stringify(result))您可以使用jsonlite包。 只有两行代码

library(jsonlite)

toJSON(df,dataframe = "values")
我认为这应该行得通