샤이니(Shiny) 패키지 연습1

   샤이니 프로그램은 같은 폴더에 존재하는 두 개의 스크립트 파일을 사용하여 만들어진다.

 그 스트립트 파일은 각각 server.R과 ui.R 이라는 이름을 가져야 한다.

샤이니 프로그램을 실행하는 순서는 다음과 같다.

1. server.R과 ui.R과 같은 폴더에 존재해야 한다.

2. 그리고 R의 워킹디렉토리로 설정해야 한다.

    (setwd("워킹디렉토리"))

3. 샤이니 패키지를 로딩한다.

    (library(shiny))

4. 콘솔에서 runApp()을 입력한다.

간단한 샤이니 프로그램 작성

R스크립트로 작성합니다.

ui.R

# ui.R

# R Shiny 어플리케이션 연습

library(shiny)

shinyUI(pageWithSidebar( # 표준 샤이니 레이아웃으로

                                     # 왼쪽은 컨트롤, 오른쪽은 아웃풋이 놓인다.

      headerPanel("Jongheeexample"),  # 인터페이스의 타이틀

      sidebarPanel(                             # 모든 유저인터페이스 컨트롤은 여기에 놓인다.

          textInput(inputId = "comment",    # 이것은 변수의 이름으로

                                                       # 이 이름이 server.R로 넘겨진다.

                    label = "Say something?",  # 변수에 대한 레이블을

                                                         # 인터페이스에 표시한다.

                    value = ""   # 초기화

              )

        ),

      mainPanel(   # 모든 아웃풋 요소는 여기에 들어간다.

        h3("This is you sating it"),   # HTML helper를 사용한 타이틀

        textOutput("textDisplay")  # server.R에서 정의된 아웃풋 요소의 이름이다.

        )

  ))

server.R

## server.R example

library(shiny)

shinyServer(function(input, output){   # 서버로직은 이 괄호 안에서 정의된다.

    output$textDisplay <- renderText({  # 함수를 반응성으로 만들고 ui.R로 보낼 것을

                                        # output$textDisplay로 할당한다.

      

      paste0("You said '", input$comment,

             "' . There are", nchar(input$comment)," characters in this.")

    })

})

샤이니 프로그램 실행

> runApp()

- R과 Shiny 패키지를 활용한 웹 애플리케이션 개발(에이콘) -