R he ki tonu i nga momo mahi. Kei raro iho ka hoatu e ahau tekau o nga mea tino pai o era, kaore pea te nuinga e mohio. I puta te tuhinga i muri mai i taku kitenga ko aku korero mo etahi o nga ahuatanga o te R e whakamahia ana e au i roto i aku mahi i harikoa mai e nga hoa hötaka. Mena kua mohio koe ki nga mea katoa mo tenei, ka mihi ahau mo te moumou taima. I te wa ano, ki te whai koe i tetahi mea hei tiri, tohua he mea whai hua i roto i nga korero.
Ka tūtohu a Skillbox: Akoranga mahi .
Ka whakamahara matou: mo nga kaipānui katoa o "Habr" - he utu mo te 10 rubles i te wa e whakauru ana ki tetahi akoranga Skillbox ma te whakamahi i te waehere whakatairanga "Habr".
mahi whakawhiti
He tino pai ki ahau te whakawhiti(). Inaa, he kupu poto noa mo te korero mena ka kowhiri i tetahi uara i runga i te uara o tetahi atu taurangi. Ka kitea e au he tino whai hua tenei ina tuhia ana e au he waehere e tika ana kia utaina he huinga raraunga motuhake i runga i te kowhiringa o mua. Hei tauira, mena he taurangi to ingoa kararehe ka hiahia koe ki te kowhiri i tetahi huinga raraunga motuhake i runga i te ahua o te kararehe he kuri, he ngeru, he rapeti ranei, tuhia tenei:
raraunga < — read.csv(
whakawhiti(kararehe,
"kuri" = "dogdata.csv",
"cat" = "catdata.csv",
"rabbit" = "rabbitdata.csv")
)
Ka whai hua tenei ahuatanga i roto i nga tono Shiny e hiahia ana koe ki te uta i nga huinga raraunga rereke, i nga konae taiao ranei i runga i te kotahi, neke atu ranei nga taonga tahua whakauru.
Hotkeys mo RStudio
Ko tenei hack ehara i te mea nui mo R, engari mo RStudio IDE. Heoi, he tino watea nga paatene wera, ka taea e koe te penapena wa i te wa e whakauru ana i nga tuhinga. Ko aku tino pai ko Ctrl+Shift+M mo te %>% kaiwhakahaere me Alt+- mo te <- operator.
Hei tiro i nga paatene wera katoa, pehia noa te Alt+Shift+K ki RStudio.
mōkihi flexdashboard
Ina hiahia koe ki te whakarewa tere i to Papatohu Shiny, kaore he mea pai ake i te kete papatohu. Ka whakarato i te kaha ki te mahi me nga pokatata HTML, na te mea ka ngawari, ka ngawari hoki te hanga i nga paetaha, rarangi me nga pou. Kei kona ano te kaha ki te whakamahi i te pae taitara, ka taea e koe te tuu ki runga i nga wharangi rereke o te tono, waiho nga tohu, nga pokatata ki a Github, nga wahitau imeera me te maha atu.
Ma te kete ka taea e koe te mahi i roto i te anga o Rmarkdown, na ka taea e koe te whakauru i nga tono katoa ki roto i te konae Rmd kotahi, kaua hoki e tohatoha ki nga tuunga rereke me nga konae UI, pera me te mahi, hei tauira, ma te whakamahi i te shinydashboard. Ka whakamahi ahau i te papaahoahoa i nga wa e hiahia ana ahau ki te hanga tauira papatohu ngawari i mua i te mahi i tetahi mea uaua. Ma tenei ahuatanga ka taea e koe te hanga tauira i roto i te haora.
req me te whakamana i nga mahi i roto i te R Shiny
Ko te whakawhanake i roto i te R Shiny ka raru, ina koa ka whiwhi koe i nga karere hapa kee ka uaua ki te mohio ki nga mea kei te haere. Engari i te wa o te wa, ka whanake me te whakapai ake a Shiny, ka nui ake nga mahi ka puta mai i konei ka taea e koe te mohio ki te take o te hapa. Na, ka whakatauhia e te req() te raru me te hapa "wahangu", i te mea kaore i te maarama he aha te mahi. Ka taea e koe te whakaatu i nga huānga UI e hono ana ki nga mahi o mua. Me whakamarama me tetahi tauira:
putanga$go_button < — pīataata::renderUI({
# whakaatu noa te paatene mena kua tohua he urunga kararehe
kanapa::req(whakauru$kararehe)
# patene whakaatu
pīataata::actionButton("haere",
whakapiri("Whakahaere", tāuru$kararehe, "tātari!")
)
})
Ka tirohia e te validate() nga mea katoa i mua i te whakaputanga ka hoatu ki a koe te whiringa ki te ta i tetahi karere hapa - hei tauira, he he te konae i tukuna e te kaiwhakamahi:
# tiki csv konae whakauru
inKōnae < — tāuru$kōnae1
raraunga < — inFile$datapath
# hoatu ripanga mena he kuri anake
pīataata::renderRipanga({
# tirohia ko te konae kuri, ehara i te ngeru, te rapeti ranei
kanapa:: whakamana(
need("Ingoa Kuri" %in% colnames(raraunga)),
“Kaore i kitea te pou Ingoa Kuri — i utaina e koe te konae tika?”
)
raraunga
})
He korero ano mo enei ahuatanga katoa .
Te rokiroki i o tohu mo koe ki te taiao punaha
Mena kei te whakamahere koe ki te tiri i te waehere e hiahia ana koe ki te whakauru i nga tohu tohu, whakamahia te taiao punaha hei karo i te manaaki i o ake tohu ki a Github, ki tetahi atu ratonga ranei. Tauira whakanohonga:
Sys.setenv(
DSN = "ingoa_papa raraunga",
UID = "ID Kaiwhakamahi",
PASS = "Kupuhipa"
)
Inaianei ka taea e koe te takiuru ma te whakamahi i nga taurangi taiao:
db < — DBI::dbConnect(
drv = odbc::odbc(),
dsn = Sys.getenv("DSN"),
uid = Sys.getenv("UID"),
pwd = Sys.getenv("PASS")
)
He pai ake (ina koa mena ka whakamahia e koe nga raraunga) ki te whakarite i a raatau hei taurangi taiao i roto i te punaha whakahaere. I roto i tenei take, ka watea tonu, kaore koe e tohu i roto i te waehere.
Whakaaunoatia te tidyverse ki te whakaahua
Ka taea e te mokihi styler te awhina i a koe ki te horoi i to waehere; he maha nga whiringa mo te kawe aunoa i te ahua o te waehere ki roto. Ko nga mea katoa hei mahi maau ko te whakahaere styler::style_file() i runga i to tuhinga raru. Ka nui te mahi a te kete (engari ehara i nga mea katoa) hei whakaora i te ota.
Parameterizing R Tuhinga Tohu
Na kua hanga e koe he tuhinga R Markdown tino pai hei tātari i nga momo meka mo nga kuri. Na ka puta ki a koe he pai ake te mahi i taua mahi, engari me nga ngeru anake. Kaore he raru, ka taea e koe te hanga aunoa i nga purongo ngeru me te whakahau kotahi. Hei mahi i tenei, me tawhā noa to tuhinga tohu tohu R.
Ka taea e koe tenei ma te tautuhi i nga tawhā mo te pane YAML i roto i te tuhinga kua tohua, ka tautuhi i nga tawhā uara.
— taitara: “Tatari kararehe”
kaituhi: "Keith McNulty"
rā: "21 Maehe 2019"
putanga:
html_tuhinga:
code_folding: "huna"
parama:
ingoa_kararehe:
uara: Kuri
kōwhiringa:
—Kurī
—Kati
— Rapeti
tau_o_ako:
tāuru: rēreti
min: 2000
teitei: 2019
taahiraa: 1
huri: 1
hepe:"
uara: [2010, 2017] —
Inaianei ka taea e koe te rehita i nga taurangi katoa i roto i te waehere tuhinga hei params$animal_name me params$years_of_study. Na ka whakamahi tatou i te tahua takaiho Knit (knit_with_parameters()) ka taea ki te kowhiri i nga tawhā.
heheu
Ko te revealjs he kete ka taea e koe te hanga whakaaturanga HTML nui me te waehere R kua hangaia, te whakaterenga mohio me nga tahua kiriata. Ko nga pokatata HTML ka taea e koe te hanga tere i te hanganga kiriata kohanga me nga momo momo momo whiringa. Ae, ka rere te HTML i runga i tetahi taputapu, na reira ka taea te whakatuwhera i te whakaaturanga ki runga waea, papa, pona ranei. Ka taea te whirihora i nga korero korero ma te whakauru i te kete me te karanga ki te pane YAML. Anei he tauira:
— taitara: “Te Tirohanga i te Tapa o te Ao Taatari Tangata”
kaituhi: "Keith McNulty"
putanga:
revealjs::revealjs_presentation:
pokapū: ae
tauira:starwars.html
kaupapa: pango
te ra: "Hui hui a HR Analytics i Raanana - 18 Poutū-te-rangi, 2019"
rauemi_kōnae:
— darth.png
- deathstar.png
- hanchewy.png
- mileniuma.png
- r2d2-threepio.png
-starwars.html
—starwars.png
—stormtrooper.png
-
Waehere puna whakaaturanga , me ia ano'> whakaaturanga - i konei.
Nga tohu HTML i roto i te R Shiny
Ko te nuinga o te hunga hötaka kare e tino whai hua ki nga tohu HTML kei a R Shiny. Engari he tohu 110 noa enei, e taea ai te hanga waea poto mo te mahi HTML me te purei pāpāho ranei. Hei tauira, ina tata nei i whakamahia e ahau te tags$ororongo ki te purei i te oro "wikitoria" hei whakamohio i te kaiwhakamahi ina oti te mahi.
Mōkihi whakamoemiti
He tino ngawari te whakamahi i tenei kete, engari me whakaatu mihi ki te kaiwhakamahi. He ahua ke, engari he tino pai ki a raatau.
Ka tūtohu a Skillbox:
- E rua tau te akoranga mahi .
- Akoranga aipurangi .
- Akoranga tau mahi .
Source: will.com