ui <- fluidPage( titlePanel(), sidebarLayout( sidebarPanel( ), mainPanel( ) ))shinyApp(ui, server)

ui <- fluidPage( numericInput("samplesize", label = "Sample size", value = 100, step=100), plotOutput("histogram"))server <- function(input, output, session) { output$histogram <- renderPlot(qplot(rnorm(input$samplesize)))}shinyApp(ui, server)

ui <- fluidPage( numericInput("count", label = "Number of values", value = 100), textOutput("double"))server <- function(input, output, session) { output$double <- renderPrint(2*input$count)}shinyApp(ui, server)

「プリマジ」、それは歌とダンスとファッションで作り上げるエンターテインメント！魔法のようにキラキラと輝くステージには秘密がありました！そう、実は本当に「魔法」だったんです！主人公、陽比野まつりは「プリマジ」に憧れている中学一年生。ある日、突然現れた魔法使いの「みゃむ」から「プリマジ」にスカウトされることに！！ライバル達に負けないように２人で一緒に「プリマジ」のトップを目指します！

私はここにいる

以后可以把这里当成备份的地方

大家好，我是che