Блог

Главная - Вопросы по программированию - R изменение размера вывода блестящего изображения

R изменение размера вывода блестящего изображения

#r #shiny

#r #блестящий

Вопрос:

У меня есть изображения размером 1770×2101 пикселей (l.png, n.png, a.png), и мне нужно отобразить размер 100 * 300 пикселей

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

 imageOutput("myImage", width = "100%", height = "300px"))

сервер

 output$myImage <-renderImage({
if (input$l == 'l') Leg<-"www/l.png"
if (input$l == 'n') Leg<-"www/n.png"
if (input$l == 'b') Leg<-"www/b.png"
if (input$l == 'a') Leg<-"www/a.png"
list(src=Leg)
},deleteFile = FALSE)

Но размер изображения не изменяется.

Ответ №1:

Вы должны установить размеры в renderImage :

 list(src = Leg, width = "100%", height = "300")