Как выровнять центр кнопок радио в функции box () в коде R? - PullRequest
0 голосов
/ 20 февраля 2020

Я не могу выровнять центр по моим переключателям в поле () в R-программировании. В настоящее время его расположение по левому краю по умолчанию. Я хочу, чтобы эти две радиокнопки были в центре поля (). Найдите снимок.

код:

пользовательский интерфейс -

box(h4("Select version"),    fluidRow(radioButtons("Ben", "____________________", c("DESH1","DESH2" 
), inline = T),
plotOutput("lineChart", height = 360, width = 1000)),  width = 700, height = 500, background = "black"))

сервер - enter image description here

if (input$Ben ==  "DESH1") {

  ggplot(data = line3, aes(x = Month, y= CountOfBeneficiaries.x, group = 2)) +
    #ggplot(data= line3, aes(x = Month, y1 = CountOfBeneficiaries.y, group = 2 )) +
    geom_line(color = "green", size = 1) +
    geom_point(color = "yellow", size = 15) +
    theme(legend.position="top") + theme_minimal() +
    geom_text(data = line3, aes(label = CountOfBeneficiaries.x), size = 4, color = 'black') +
    geom_hline(yintercept = mean(line3$CountOfBeneficiaries.x), color = 'red')

} else {

  ggplot(data = line3, aes(x = Month, y= CountOfBeneficiaries.y, group = 2)) +
    #ggplot(data= line3, aes(x = Month, y1 = CountOfBeneficiaries.y, group = 2 )) +
    geom_line(color = "green", size = 1) +
    geom_point(color = "yellow", size = 15) +
    theme(legend.position="top") + theme_minimal() +
    geom_text(data = line3, aes(label = CountOfBeneficiaries.y), size = 4, color = 'black') +
    geom_hline(yintercept = mean(line3$CountOfBeneficiaries.y), color = 'red')

}
...