如何在R中的Highcharter中添加错误栏

Question

我试图实施以下代码无济于事：

output$genePlot <- {renderHighchart({
req(input$gene)
a=testdata2[,input$gene,drop=FALSE]-testdatase2[,input$gene,drop=FALSE]
b=x=testdata2[,input$gene,drop=FALSE]+testdatase2[,input$gene,drop=FALSE]
  highchart() %>%
    hc_add_series(data=testdata2[,input$gene, drop=FALSE], type="errorbar", low=a, high=b, y=testdata2[,input$gene, drop=FALSE]) %>%
    hc_add_series(name=input$gene, data=testdata2[,input$gene, drop=FALSE], type="column") %>%
    hc_xAxis(categories = c('CD14+', 
                            'CD19+',
                            'CD4+',
                            'CD56+',
                            'CD8+',
                            'Neutrophils',
                            'nRBCs',
                            'WB')) %>%
    hc_title(text= "Graph of Gene Expression")

我不知道如何将errorbars居中于所创建的柱形图的顶部。作为参考，testdata2是原始的dataset。 testdatase2是具有每个绘图点标准误差的相应dataset。

柱形图可以完美呈现，但误差线却不能。

谢谢您的帮助！