Question

我有一个像这样的csv文件：

DateTime        Server1 Server2 Server3
8/24/2014 15:20 6.09    5.7     5.21
8/24/2014 15:55 4.54    4.38    5.33
8/24/2014 16:04 5.03    4.52    4.92
8/24/2014 16:18 4.93    4.61    5.56
8/24/2014 16:27 6.27    4.18    5.62
8/24/2014 16:42 4.59    4.61    6.73
8/24/2014 16:56 5.91    4.37    4.76
8/24/2014 17:10 4.53    4.3     4.59

我使用ocpu platfrom上传它。读取csv文件的R函数是：

readcsvnew <- function(file, ...){
  if(!grepl(".csv$", file)){
    stop("Uploaded file must be a .csv file!")
  }
  read.csv(file, header=TRUE, ...);
}

一旦我使用ocpu读取此文件，数据就在会话中。现在我需要打电话来更新我的HTML列表。为此，我需要调用session对象并以json格式检索标头：

<legend>Plot Parameters</legend>
            <label>Y-Axis</label> 
            <select id="yaxis" multiple="multiple">

            </select> 
            <label>X-Axis</label> 
            <select name="xaxis" id="pollutant">

            </select>

一旦我在Json中获得了标题，我就可以用javascript填充它。现在根据用户选择的x轴值（这将是DateTime）和Y轴值（这可能是Server1或Server1到Server3）更新选择列表，我需要再次调用session并检索值自定义Json格式如下：

{"name":"Server1","data":[[1408893651000,6.09],[1408895711000,4.54]},{"name":"Server2","data":[[1408893651000,5.7],[1408895711000,4.38]},{"name":"Server3","data":[[1408893651000,5.21],[1408895711000,5.33]}

Answer 1

如果检索对象的输出，则HTTP GET参数将映射到jsonlite :: toJSON（）。例如：

有关使用自定义JSON从RPC请求检索输出的2步过程的工作示例，请参阅this email。

或者，您可以使用as.list使函数返回列表而不是数据框。

你如何自定义格式opencpu输出

1 个答案: