R ืืื ืืืืืื ืคืื ืงืฆืืืช. ืืืื ืืชื ืขืฉืจื ืืืืขื ืืื ืื ืฉืืื, ืฉืจืืื ืืืื ืื ืืืขื ืขืืืื. ืืืืืจ ืืืคืืข ืืืืจ ืฉืืืืืชื ืฉืืกืืคืืจืื ืฉืื ืขื ืืืง ืืืืืคืืื ืื ืฉื R ืฉืืื ืื ื ืืฉืชืืฉ ืืขืืืืชื ืืชืงืืื ืืืชืืืืืช ืขื ืืื ืืชืื ืชืื ืืืจืื. ืื ืืชื ืืืจ ืืืืข ืืื ืขื ืื, ืื ืื ื ืืชื ืฆื ืขื ืืืืื ืืืื ืฉืื. ืืื ืขื ืืืช, ืื ืืฉ ืื ืืฉืื ืืฉืชืฃ, ืืืืฅ ืขื ืืฉืื ืฉืืืืฉื ืืชืืืืืช.
Skillbox ืืืืืฆื: ืงืืจืก ืืขืฉื
"ืืคืชื ืคืืืชืื" .ืื ื ืืืืืจืื: ืืื ืงืืจืื Habr - ืื ืื ืฉื 10 ืจืืื ืืขืช ืืจืฉืื ืืื ืงืืจืก Skillbox ืืืืฆืขืืช ืงืื ืืืืื ืฉื Habr.
ืคืื ืงืฆืืืช ืืชื
ืื ื ืืืื ืืืื ืืืื ืืช switch(). ืืืขืฉื, ืืื ืงืืฆืืจ ื ืื ืืืฆืืจืช if ืืขืช ืืืืจืช ืขืจื ืืืืืกืก ืขื ืขืจื ืฉื ืืฉืชื ื ืืืจ. ืื ื ืืืฆื ืืช ืื ืฉืืืืฉื ืืืืืื ืืืฉืจ ืื ื ืืืชื ืงืื ืฉืฆืจืื ืืืขืื ืงืืืฆื ืืกืืืืช ืฉื ื ืชืื ืื ืขื ืกืื ืืืืจื ืงืืืืช. ืืืืืื, ืื ืืฉ ืื ืืฉืชื ื ืืฉื ืืขื ืืืื ืืืจืฆืื ื ืืืืืจ ืงืืืฆื ืืกืืืืช ืฉื ื ืชืื ืื ืืืชืื ืื ืืืื ืืื ืืื, ืืชืื ืื ืืจื ื, ืืชืื ืืช ืื:
data < โ read.csv(
ืืชื (ืืื,
"dog" = "dogdata.csv",
"cat" = "catdata.csv",
"rabbit" = "rabbitdata.csv")
)
ืชืืื ื ืื ืชืืื ืฉืืืืฉืืช ืืืืฉืืืื ื ืืฆืฆืื ืฉืืื ืขืืื ืืืขืื ืขืจืืืช ื ืชืื ืื ืื ืงืืฆื ืกืืืื ืฉืื ืื ืืืชืื ืืคืจืื ืืื ืื ืืืชืจ ืืชืคืจืื ืงืื.
ืืงืฉื ืงืืฆืืจ ืขืืืจ RStudio
ืืคืจืืฆื ืืื ืืื ืื ืื ืื ืขืืืจ R, ืืื ืขืืืจ RStudio IDE. ืขื ืืืช, ืืงืฉื ืงืืฆืืจ ืื ืชืืื ื ืืืื ืืืื, ืืืืคืฉืจืื ืื ืืืกืื ืืื ืืขืช โโืืื ืช ืืงืกื. ืืืืขืืคืื ืฉืื ืื Ctrl+Shift+M ืขืืืจ ืืืืคืจืืืจ %>% ื- Alt+- ืขืืืจ ืืืืคืจืืืจ <-.
ืืื ืืืฆืื ืืช ืื ืืงืฉื ืืงืืฆืืจ, ืคืฉืื ืืงืฉ Alt+Shift+K ื-RStudio.
ืืืืืช flexdashboard
ืืืฉืจ ืืชื ืฆืจืื ืืืคืขืื ืืืืืจืืช ืืช ืืื ืืืืืื ืื ืืืืจืืง ืฉืื, ืืื ืืืจ ืืื ืืืชืจ ืืืืืืช ืืื ืืืืืื ืื. ืืื ืืกืคืง ืืช ืืืืืืช ืืขืืื ืขื ืงืืฆืืจื HTML, ืืฉืจ ืืชืืจื ืืงืืื ืืืื ืืจืื ืืืฆืืจ ืกืจืืื ืฆื, ืฉืืจืืช ืืขืืืืืช. ืืฉื ื ืื ืืคืฉืจืืช ืืืฉืชืืฉ ืืฉืืจืช ืืืชืจืช, ืืืืคืฉืจืช ืืืงื ืืืชื ืืืคืื ืฉืื ืื ืฉื ืืืคืืืงืฆืื, ืืืฉืืืจ ืืืืงืื ืื, ืงืืฆืืจื ืืจื ื-Github, ืืชืืืืช ืืืื ืืขืื ืืขืื.
ืืืืืื ืืืคืฉืจืช ืืขืืื ืืืกืืจืช ืฉื Rmarkdown, ืื ืฉื ืืชื ืืืงื ืืช ืื ืืืคืืืงืฆืืืช ืืงืืืฅ Rmd ืืื, ืืื ืืืคืืฅ ืืืชื ืขื ืคื ื ืฉืจืชืื ืืงืืฆื UI ืฉืื ืื, ืืคื ืฉื ืขืฉื ืืืฉื ืืืืฆืขืืช shinydashboard. ืื ื ืืฉืชืืฉ ื-flexdashboard ืืื ืคืขื ืฉืื ื ืฆืจืื ืืืฆืืจ ืื ืืืคืืก ืคืฉืื ืฉื ืืื ืืืืื ืื ืืคื ื ืฉืื ื ืขืืื ืขื ืืฉืื ืืืจืื. ืชืืื ื ืื ืืืคืฉืจืช ืื ืืืฆืืจ ืื ืืืคืืก ืชืื ืฉืขื.
ืืืงืฉ ืืืืืช ืคืื ืงืฆืืืช ื-R Shiny
ืืคืืชืื ื-R Shiny ืืืื ืืืืืช ืืืืื, ืืืืืื ืืฉืืชื ืืงืื ืื ืืืื ืืืืขืืช ืฉืืืื ืืืืจืืช ืฉืืงืฉืืช ืขื ืืืื ื ืื ืงืืจื. ืืื ืขื ืืืื Shiny ืืชืคืชืืช ืืืฉืชืคืจืช, ืืืคืืขืืช ืืื ืืืชืจ ืืืืชืจ ืคืื ืงืฆืืืช ืฉืืืคืฉืจืืช ืืืืื ืืช ืืกืืื ืืฉืืืื. ืื, req() ืคืืชืจ ืืช ืืืขืื ืขื ืฉืืืื "ืฉืงืื", ืืืฉืจ ืืืจื ืืื ืื ืืจืืจ ืื ืงืืจื. ืื ืืืคืฉืจ ืื ืืืฆืื ืจืืืื ืืืฉืง ืืฉืชืืฉ ืืืฉืืืืื ืืคืขืืืืช ืงืืืืืช. ืืืื ื ืกืืืจ ืขื ืืืืื:
output$go_button < โ shiny::renderUI({
# ืืืฆื ืชืฆืืื ืืืื ืื ื ืืืจื ืงืื ืฉื ืืขื ืืืื
shiny::req(input$animal)
# ืืคืชืืจ ืชืฆืืื
shiny::actionButton("go",
paste("Conduct", input$animal, "analysis!")
)
})
validate() ืืืืง ืืื ืืคื ื ืจืื ืืืจ ืื ืืชื ืื ืืคืฉืจืืช ืืืืคืืก ืืืืขืช ืฉืืืื - ืืืืืื, ืฉืืืฉืชืืฉ ืืขืื ืืช ืืงืืืฅ ืืื ื ืืื:
# ืงืื ืงืืืฅ ืงืื CSV
inFile < โ input$file1
data < โ inFile$datapath
# ืขืืืื ืืืื ืจืง ืื ืื ืืืืื
shiny::renderTable({
# ืืืืง ืฉืื ืงืืืฅ ืืืื, ืื ืืชืืืื ืื ืืจื ืืืช
ืืืจืืง::validate(
need("ืฉื ืืืื" %in% colnames(data)),
"ืขืืืืช ืฉื ืืืื ืื ื ืืฆืื - ืืื ืืขื ืช ืืช ืืงืืืฅ ืื ืืื?"
)
ื ืชืื ืื
})
ืืืืข ื ืืกืฃ ืขื ืื ืืชืืื ืืช ืืืื
ืืืกืื ืืืืฉืืจืื ืฉืื ืืขืฆืื ืืกืืืืช ืืืขืจืืช
ืื ืืชื ืืชืื ื ืืฉืชืฃ ืงืื ืฉืืืจืฉ ืืื ืืืืื ืืืฉืืจืื, ืืฉืชืืฉ ืืกืืืืช ืืืขืจืืช ืืื ืืืืื ืข ืืืืจืื ืืืฉืืจืื ืืฉืื ื- Github ืื ืืฉืืจืืช ืืืจ. ืืืงืื ืืืืืื:
Sys.setenv(
DSN = "ืฉื_ืืกืืก ืื ืชืื ืื",
UID = "ืืืืื ืืฉืชืืฉ",
PASS = "ืกืืกืื"
)
ืืขืช ืชืืื ืืืืื ืก ืืืืฆืขืืช ืืฉืชื ื ืกืืืื:
db < โ DBI::dbConnect(
drv = odbc::odbc(),
dsn = Sys.getenv("DSN"),
uid = Sys.getenv("UID"),
pwd = Sys.getenv("PASS")
)
ืื ืืคืืื ืืืชืจ ื ืื (ืืืืืื ืื ืืชื ืืฉืชืืฉ ืื ืชืื ืื ืืขืชืื ืงืจืืืืช) ืืืืืืจ ืืืชื ืืืฉืชื ื ืกืืืื ืืฉืืจืืช ืืืขืจืืช ืืืคืขืื. ืืืงืจื ืื, ืื ืชืืื ืืืื ืืืื ืื ืืื ืชืฆืืจืื ืืฆืืื ืืืชื ืืงืื.
ืืืืืืฆืื ืฉื Tyyverse ืขื ืกืืืืืจ
ืืืืืช ืืกืื ืื ืืืืื ืืขืืืจ ืื ืื ืงืืช ืืช ืืงืื ืฉืื; ืืฉ ืื ืืคืฉืจืืืืช ืจืืืช ืืืืื ืืืืืืืืช ืฉื ืกืื ืื ืืงืื ืืืฆื ืืกืืืจ. ืื ืื ืฉืืชื ืฆืจืื ืืขืฉืืช ืืื ืืืคืขืื ืืช styler::style_file() ืขื ืืกืงืจืืคื ืืืขืืืชื ืฉืื. ืืืืืื ืชืขืฉื ืืจืื (ืืื ืื ืืื) ืืื ืืืืืืจ ืืช ืืกืืจ ืขื ืื ื.
ืคืจืืืจืืืฆืื ืฉื ืืกืืื R Markdown
ืื ืืฆืจืช ืืกืื R Markdown ื ืืืจ ืฉืื ืืชื ืื ืชื ืขืืืืืช ืฉืื ืืช ืขื ืืืืื. ืืื ืขืืื ืืืขืชื ืฉืขืืืฃ ืืขืฉืืช ืืช ืืืชื ืขืืืื, ืืื ืจืง ืขื ืืชืืืื. ืืื ืืขืื, ืืชื ืืืื ืืืคืื ืืช ืืืฆืืจื ืฉื ืืืืืช ืืชืืืื ืืืืืืืืืื ืืคืงืืื ืืืช ืืืื. ืืื ืืขืฉืืช ืืืช, ืืชื ืจืง ืฆืจืื ืืืืืืจ ืคืจืืืจืื ืฉื ืืกืื ืืกืืืื R ืฉืื.
ืืชื ืืืื ืืขืฉืืช ืืืช ืขื ืืื ืืืืจืช ืคืจืืืจืื ืขืืืจ ืืืืชืจืช YAML ืืืกืื ืฉืฆืืื, ืืืืืจ ืืื ืืืืจืช ืคืจืืืจื ืืขืจื.
- ืืืชืจืช: "ื ืืชืื ืืขืื ืืืื"
ืืืืจ: "ืงืืช' ืืงื ืืื"
ืชืืจืื: "21 ืืืจืฅ 2019"
ืชึฐืคืึผืงึธื:
html_document:
code_folding: "ืืกืชืจ"
ืคืืจืืื:
ืฉื_ืืื:
ืขืจื: ืืื
ืืคืฉืจืืืืช:
-ืึผึถืึถื
-ืืชืื
- ืืจื ื
ืฉื ืืช_ืืืืื:
ืงืื: ืืืืื
ืืงืืช: 2000
ืืงืกืืืื: 2019
ืฉืื 1
ืกืืืื 1
ืกืคืืืืจ: "
ืขืจื: [2010, 2017] โ
ืืขืช ื ืืชื ืืจืฉืื ืืช ืื ืืืฉืชื ืื ืืงืื ืืืกืื ื-params$animal_name ื-params$years_of_study. ืืืืจ ืืื ื ืฉืชืืฉ ืืชืคืจืื ืื ืคืชื Knit (ืื knit_with_parameters()) ืื ืืื ืืืืืจ ืคืจืืืจืื.
ืืืื
revealjs ืืื ืืืืื ืืืืคืฉืจืช ืื ืืืฆืืจ ืืฆืืืช HTML ื ืืืจืืช ืขื ืงืื R ืืืื ื, ื ืืืื ืืื ืืืืืืืื ืืชืคืจืืื ืฉืงืืคืืืช. ืงืืฆืืจื HTML ืืืคืฉืจืื ืื ืืืฆืืจ ืืืืืจืืช ืืื ื ืฉืงืืคืืืช ืืงืื ื ืขื ืืคืฉืจืืืืช ืขืืฆืื ืฉืื ืืช. ืืืื, HTML ืืคืขื ืืื ืืืฉืืจ, ืื ืฉื ืืชื ืืคืชืื ืืช ืืืฆืืช ืืื ืืืคืื, ืืืืื ืื ืืืฉื ื ืืื. ื ืืชื ืืืืืืจ ืืช ืืืืื ืืืืืข ืขื ืืื ืืชืงื ืช ืืืืืื ืืงืจืืื ืื ืืืืชืจืช YAML. ืื ื ืืืืื:
- ืืืชืจืช: "ืืงืืจืช ืืงืฆื ืฉื ืืืงืื ืฉื People Analytics"
ืืืืจ: "ืงืืช' ืืงื ืืื"
ืชึฐืคืึผืงึธื:
revealjs::revealjs_presentation:
ืืจืื: ืื
template:starwars.html
ื ืืฉื: ืฉืืืจ
ืชืืจืื: "HR Analytics Meetup London - 18 ืืืจืฅ, 2019"
resource_files:
โ darth.png
- deathstar.png
- hanchewy.png
- millennium.png
- r2d2-threepio.png
-starwars.html
โstarwars.png
โstormtrooper.png
-
ืงืื ืืงืืจ ืฉื ืืฆืืช
ืชืื HTML ื-R Shiny
ืจืื ืืืชืื ืชืื ืื ืื ืฆืืื ืืช ืืืื ืืืชืจืื ืืช ืฉื ืชืืืืช ื-HTML ืฉืืฉ ื-R Shiny. ืืื ืืื ืจืง 110 ืชืืืืช, ืฉืืืคืฉืจืืช ืืืฆืืจ ืงืจืืื ืงืฆืจื ืืคืื ืงืฆืืืช HTML ืื ืืฉืืขืช ืืืื. ืืืืืื, ืืืืจืื ื ืืฉืชืืฉืชื ื-tags$audio ืืื ืืืฉืืืข ืฆืืื "ื ืืฆืืื" ืฉืืชืจืืข ืืืฉืชืืฉ ืืืฉืจ ืืฉืืื ืืืฉืืื.
ืืืืืช ืฉืืืื
ืืฉืืืืฉ ืืืืืื ืื ืืื ืคืฉืื ืืืื, ืื ืืื ื ืืืฅ ืืื ืืืฆืื ืฉืืืื ืืืฉืชืืฉ. ืื ื ืจืื ืืืืจ, ืืื ืื ืืืืงื ืืืืืื ืืช ืื.
Skillbox ืืืืืฆื:
- ืงืืจืก ืืขืฉื ืฉื ืชืืื
"ืื ื ืืคืชื ืืชืจืื PRO" .- ืงืืจืก ืืงืืื
"ืืคืชื C#" .- ืงืืจืก ืืขืฉื ืื ืฉื ื
"ืืคืชื PHP ื-0 ื-PRO" .
ืืงืืจ: www.habr.com