Question

我正在尝试计算数组中每行的总和并将其放在向量中，你可以在下面找到我的尝试，

为此，它为前4个打印相同的值，为最后1个打印不同的值$html = View::make($url)->render();

我想要的是例如

215 215 215 215 316

并将值Sumx1放在矢量中。

这是我的尝试

x1 2 4 4 6 7  Sumx1=??
x2 1 2 3 4 5  etc
x3 1 2 3 4 5 
x4 1 2 4 5 6

Answer 1

library(shiny)


ui <- fluidPage(

  selectInput("numberchoice",label = "Choose an image", choices = c(1:6), selected = 1)
  ,
  imageOutput("image")
  ,
  radioButtons("answerchoice", "Answers", choices = c(2:6))

)

server <- function(input,output,session) {
  answers <- read.csv("~/Answers.csv")
  questions <- read.csv("~/Answers.csv")
  output$image <- renderImage(list(src = paste("~",".png", sep = "")
  ,contentType = "image/png", alt = "Face"),deleteFile = FALSE)
  eventReactive(input$numberchoice,{updateRadioButtons(session,"answerchoice",choices = questions[input$numberchoice,2:6])})
}

shinyApp(ui = ui, server = server)

尝试删除内部循环（具有变量c的循环）。应该工作。

Answer 2

由于你的内循环c，你将和pay[i][0]+pay[i][1]+pay[i][2]+pay[i][3]加到向量上四次。

您真正想要的是以下内容，

for(int i=0; i<5; i++){
    int sum = 0;
    for(int c=0; c<4; c++)
        sum += pay[i][c];
    totals.push_back(sum);
    cout<<totals[i]<<"  ";
}

如何计算2D数组中每行的总和并放置在向量中？

2 个答案: