Question

对于此链接Identify points within a rectangle in a scatterplot已解决的问题，我想使用主成分分析。图表显示正确，但是在显示表时我错过了一些东西。如果有人知道问题出在哪里，请提供帮助。

代码（EDIT）：

 public getData() {
    return this.http.get(API_ENDPOINT).pipe(shareReplay(1))
  }

结果：

Answer 1

我认为您的问题是在res <- brushedPoints(df, input$plot_brush)中引用了数据框df，其中包含您在renderPlot({...})命令中生成的数据。该数据将无法在表输出命令中调用。尝试添加

df <- reactive({
    #your data here
})

，然后调用res <- brushedPoints(df(), input$plot_brush)。

如果这似乎不起作用，请发布一些示例数据，然后我将更新我的答案。

编辑：

这是一个更明确的建议。您仍在尝试从renderPlot({...})调用数据。尝试在反应式语句中生成数据，然后再调用它。

df <- reactive({
    data(decathlon2)
    decathlon2.active <- decathlon2[1:23, 1:10]
    res.pca <- PCA(decathlon2.active, graph = FALSE)
})

您将仍然需要向brushedPoints提供xvar和yvar参数。