
рдЖрд░ рд╡рд┐рднрд┐рдиреНрди рдХрд╛рд░реНрдпреЛрдВ рд╕реЗ рднрд░рд╛ рд╣реИред рдиреАрдЪреЗ рдореИрдВ рдЙрдирдореЗрдВ рд╕реЗ рд╕рдмрд╕реЗ рджрд┐рд▓рдЪрд╕реНрдк рджрд╕ рджреЗ рджреВрдБрдЧрд╛, рдЬрд┐рдирдХреЗ рдмрд╛рд░реЗ рдореЗрдВ рдмрд╣реБрдд рд╕реЗ рд▓реЛрдЧ рдирд╣реАрдВ рдЬрд╛рдирддреЗ рд╣реЛрдВрдЧреЗред рд▓реЗрдЦ рдХреЗ рдмрд╛рдж рдореБрдЭреЗ рдкрддрд╛ рдЪрд▓рд╛ рдХрд┐ рдореЗрд░реА рдХреБрдЫ рд╡рд┐рд╢реЗрд╖рддрд╛рдУрдВ рдХреЗ рдмрд╛рд░реЗ рдореЗрдВ рдореЗрд░реА рдХрд╣рд╛рдирд┐рдпрд╛рдВ рдЬреЛ рдореИрдВ рдЕрдкрдиреЗ рдХрд╛рдо рдореЗрдВ рдЙрдкрдпреЛрдЧ рдХрд░рддрд╛ рд╣реВрдВ, рдкрд░рд┐рдЪрд┐рдд рдкреНрд░реЛрдЧреНрд░рд╛рдорд░ рджреНрд╡рд╛рд░рд╛ рдЙрддреНрд╕рд╛рд╣рдкреВрд░реНрд╡рдХ рд╕реНрд╡реАрдХрд╛рд░ рдХреА рдЬрд╛рддреА рд╣реИрдВред рдпрджрд┐ рдЖрдк рдкрд╣рд▓реЗ рд╕реЗ рд╣реА рдЗрд╕рдХреЗ рдмрд╛рд░реЗ рдореЗрдВ рд╕рдм рдХреБрдЫ рдЬрд╛рдирддреЗ рд╣реИрдВ, рддреЛ рдореИрдВ рд╕рдордп рдмрд┐рддрд╛рдиреЗ рдХреЗ рд▓рд┐рдП рдорд╛рдлреА рдорд╛рдВрдЧрддрд╛ рд╣реВрдВред рдЙрд╕реА рд╕рдордп, рдпрджрд┐ рдЖрдкрдХреЗ рдкрд╛рд╕ рд╕рд╛рдЭрд╛ рдХрд░рдиреЗ рдХреЗ рд▓рд┐рдП рдХреБрдЫ рд╣реИ, рддреЛ рдЯрд┐рдкреНрдкрдгрд┐рдпреЛрдВ рдореЗрдВ рдЙрдкрдпреЛрдЧреА рдХреБрдЫ рд╕рд▓рд╛рд╣ рджреЗрдВред
рд╕реНрдХрд┐рд▓рдмреЙрдХреНрд╕ рдХреА рд╕рд┐рдлрд╛рд░рд┐рд╢: рдкрд╛рдпрдерди рдбреЗрд╡рд▓рдкрд░ рдЯреНрдпреВрдЯреЛрд░рд┐рдпрд▓ ред
рд╣рдо рдЖрдкрдХреЛ рдпрд╛рдж рджрд┐рд▓рд╛рддреЗ рд╣реИрдВ: "рд╣реИрдмрд░" рдХреЗ рд╕рднреА рдкрд╛рдардХреЛрдВ рдХреЗ рд▓рд┐рдП - "рд╣реИрдмрд░" рдкреНрд░реЛрдореЛ рдХреЛрдб рдХрд╛ рдЙрдкрдпреЛрдЧ рдХрд░рдХреЗ рдХрд┐рд╕реА рднреА рд╕реНрдХрд┐рд▓рдмреЙрдХреНрд╕ рдХреЛрд░реНрд╕ рдХреЗ рд▓рд┐рдП рдкрдВрдЬреАрдХрд░рдг рдХрд░рддреЗ рд╕рдордп 10,000 рд░реВрдмрд▓ рдХреА рдЫреВрдЯред
рд╕реНрд╡рд┐рдЪ рд╕рдорд╛рд░реЛрд╣
рдореИрдВ рд╡рд╛рд╕реНрддрд╡ рдореЗрдВ, рд╡рд╛рд╕реНрддрд╡ рдореЗрдВ рд╕реНрд╡рд┐рдЪ рдХреА рддрд░рд╣ ()ред рд╡рд╛рд╕реНрддрд╡ рдореЗрдВ, рдХрд┐рд╕реА рдЕрдиреНрдп рдЪрд░ рдХреЗ рдореВрд▓реНрдп рдХреЗ рдЕрдиреБрд╕рд╛рд░ рдореВрд▓реНрдп рдЪреБрдирддреЗ рд╕рдордп рдпрд╣ рдХрдерди рдХрд╛ рдПрдХ рд╕реБрд╡рд┐рдзрд╛рдЬрдирдХ рд╕рдВрдХреНрд╖рд┐рдкреНрдд рдирд╛рдо рд╣реИред рдХреЛрдб рд▓рд┐рдЦрддреЗ рд╕рдордп рдореБрдЭреЗ рдпрд╣ рд╡рд┐рд╢реЗрд╖ рд░реВрдк рд╕реЗ рдЙрдкрдпреЛрдЧреА рд▓рдЧрддрд╛ рд╣реИ рдЬреЛ рдХрд┐ рдкрд┐рдЫрд▓реЗ рдкрд╕рдВрдж рдХреЗ рдЕрдиреБрд╕рд╛рд░ рдПрдХ рд╡рд┐рд╢рд┐рд╖реНрдЯ рдбреЗрдЯрд╛ рд╕реЗрдЯ рдХреЛ рд▓реЛрдб рдХрд░рдирд╛ рдЪрд╛рд╣рд┐рдПред рдЙрджрд╛рд╣рд░рдг рдХреЗ рд▓рд┐рдП, рдпрджрд┐ рдХреЛрдИ рдЪрд░ рдирд╛рдо рдХрд╛ рдЬрд╛рдирд╡рд░ рд╣реИ рдФрд░ рдЖрдкрдХреЛ рдПрдХ рд╡рд┐рд╢рд┐рд╖реНрдЯ рдбреЗрдЯрд╛ рд╕реЗрдЯ рдХрд╛ рдЪрдпрди рдХрд░рдиреЗ рдХреА рдЖрд╡рд╢реНрдпрдХрддрд╛ рд╣реИ, рддреЛ рдпрд╣ рдирд┐рд░реНрднрд░ рдХрд░рддрд╛ рд╣реИ рдХрд┐ рдЬрд╛рдирд╡рд░ рдХреБрддреНрддрд╛, рдмрд┐рд▓реНрд▓реА рдпрд╛ рдЦрд░рдЧреЛрд╢ рд╣реИ, рдпрд╣ рд▓рд┐рдЦреЗрдВ:
рдбреЗрдЯрд╛ <- read.csv (
рд╕реНрд╡рд┐рдЪ (рдЬрд╛рдирд╡рд░,
"рдбреЙрдЧ" = "рдбреЙрдЧрдбрд╛рдЯрд╛.рд╕реНрдХрд╡",
"рдХреИрдЯ" = "рдХреИрдЯрдбреЗрдЯ.рдХреИрд╢",
"рд░реИрдмрд┐рдЯ" = "рд░реИрдмрд┐рдЯрдбрд╛рдЯрд╛редрдПрд╕рд╕реАрд╡реА")
)рдпрд╣ рд╕реБрд╡рд┐рдзрд╛ рдЪрдордХрджрд╛рд░ рдЕрдиреБрдкреНрд░рдпреЛрдЧреЛрдВ рдореЗрдВ рдЙрдкрдпреЛрдЧреА рд╣реЛрдЧреА рдЬрд╣рд╛рдВ рдЖрдкрдХреЛ рдПрдХ рдпрд╛ рдХрдИ рдкреНрд░рд╡реЗрд╢ рдореЗрдиреВ рдЖрдЗрдЯрдо рдХреЗ рдЖрдзрд╛рд░ рдкрд░ рд╡рд┐рднрд┐рдиреНрди рдбреЗрдЯрд╛ рд╕реЗрдЯ рдпрд╛ рдкрд░реНрдпрд╛рд╡рд░рдг рдлрд╝рд╛рдЗрд▓реЛрдВ рдХреЛ рд▓реЛрдб рдХрд░рдиреЗ рдХреА рдЖрд╡рд╢реНрдпрдХрддрд╛ рд╣реЛрддреА рд╣реИред
RStudio рдХреЗ рд▓рд┐рдП рдХреАрдмреЛрд░реНрдб рд╢реЙрд░реНрдЯрдХрдЯ
рдпрд╣ рд╣реИрдХ R рдХреЗ рд▓рд┐рдП рдЗрддрдирд╛ рдирд╣реАрдВ рд╣реИ рдЬрд┐рддрдирд╛ RStudio IDE рдХреЗ рд▓рд┐рдП рд╣реИред рдлрд┐рд░ рднреА, рдЧрд░реНрдо рдХреБрдВрдЬреА рд╣рдореЗрд╢рд╛ рдмрд╣реБрдд рд╕реБрд╡рд┐рдзрд╛рдЬрдирдХ рд╣реЛрддреА рд╣реИ, рдЬрд┐рд╕рд╕реЗ рдЖрдк рдкрд╛рда рдореЗрдВ рдкреНрд░рд╡реЗрд╢ рдХрд░рддреЗ рд╕рдордп рд╕рдордп рдмрдЪрд╛ рд╕рдХрддреЗ рд╣реИрдВред рдореЗрд░рд╛ рдкрд╕рдВрджреАрджрд╛%>% рдСрдкрд░реЗрдЯрд░ рдХреЗ рд▓рд┐рдП Ctrl + Shift + M рд╣реИ рдФрд░ <- рдСрдкрд░реЗрдЯрд░ рдХреЗ рд▓рд┐рдП Alt +ред
рд╕рднреА рдЧрд░реНрдо рдХреБрдВрдЬрд┐рдпреЛрдВ рдХреЛ рджреЗрдЦрдиреЗ рдХреЗ рд▓рд┐рдП, рдмрд╕ RStudio рдореЗрдВ Alt + Shift + K рджрдмрд╛рдПрдВред
Flexdashboard рдкреИрдХреЗрдЬ
рдЬрдм рдЖрдкрдХреЛ рдЬрд▓реНрджреА рд╕реЗ рдЪрдордХрджрд╛рд░ рдирд┐рдпрдВрддреНрд░рдг рдХрдХреНрд╖ рд▓реЙрдиреНрдЪ рдХрд░рдиреЗ рдХреА рдЖрд╡рд╢реНрдпрдХрддрд╛ рд╣реЛрддреА рд╣реИ, рддреЛ рдбреИрд╢рдмреЛрд░реНрдб рдкреИрдХреЗрдЬ рд╕реЗ рдмреЗрд╣рддрд░ рдХреБрдЫ рдирд╣реАрдВ рд╣реЛрддрд╛ рд╣реИред рдпрд╣ HTML рд╢реЙрд░реНрдЯрдХрдЯ рдХреЗ рд╕рд╛рде рдХрд╛рдо рдХрд░рдиреЗ рдХреА рдХреНрд╖рдорддрд╛ рдкреНрд░рджрд╛рди рдХрд░рддрд╛ рд╣реИ, рдЬреЛ рдмрджрд▓реЗ рдореЗрдВ рд╕рд╛рдЗрдбрдмрд╛рд░, рдкрдВрдХреНрддрд┐рдпреЛрдВ рдФрд░ рд╕реНрддрдВрднреЛрдВ рдХреЛ рдЖрд╕рд╛рдиреА рд╕реЗ рдФрд░ рдмрд┐рдирд╛ рд╕рдорд╕реНрдпрд╛рдУрдВ рдХреЗ рдмрдирд╛рдирд╛ рдЖрд╕рд╛рди рдмрдирд╛рддрд╛ рд╣реИред рд╢реАрд░реНрд╖рдХ рдмрд╛рд░ рдХрд╛ рдЙрдкрдпреЛрдЧ рдХрд░рдиреЗ рдХреА рдХреНрд╖рдорддрд╛ рднреА рд╣реИ, рдЬреЛ рдЖрдкрдХреЛ рдЗрд╕реЗ рдПрдкреНрд▓рд┐рдХреЗрд╢рди рдХреЗ рд╡рд┐рднрд┐рдиреНрди рдкреГрд╖реНрдареЛрдВ рдкрд░ рд░рдЦрдиреЗ, рдЖрдЗрдХрди рдЫреЛрдбрд╝рдиреЗ, рдЬреАрдердм рдкрд░ рд╢реЙрд░реНрдЯрдХрдЯ, рдИрдореЗрд▓ рдкрддреЗ рдФрд░ рдмрд╣реБрдд рдХреБрдЫ рдХрд░рдиреЗ рдХреА рдЕрдиреБрдорддрд┐ рджреЗрддрд╛ рд╣реИред
рдкреИрдХреЗрдЬ рдЖрдкрдХреЛ рд░рдорд╛рд░реНрдХрдбрд╛рдЙрди рдХреЗ рдврд╛рдВрдЪреЗ рдХреЗ рднреАрддрд░ рдХрд╛рдо рдХрд░рдиреЗ рдХреА рдЕрдиреБрдорддрд┐ рджреЗрддрд╛ рд╣реИ, рддрд╛рдХрд┐ рдЖрдк рд╕рднреА рдЕрдиреБрдкреНрд░рдпреЛрдЧреЛрдВ рдХреЛ рдПрдХ рдЖрд░рдПрдордбреА рдлрд╝рд╛рдЗрд▓ рдореЗрдВ рд░рдЦ рд╕рдХреЗрдВ, рдмрдЬрд╛рдп рдЙрдиреНрд╣реЗрдВ рдЕрд▓рдЧ-рдЕрд▓рдЧ рд╕рд░реНрд╡рд░реЛрдВ рдФрд░ рдпреВрдЖрдИ рдлрд╛рдЗрд▓реЛрдВ рдХреЛ рд╡рд┐рддрд░рд┐рдд рдХрд░рдиреЗ рдХреЗ, рдЬреИрд╕рд╛ рдХрд┐ рдХрд┐рдпрд╛ рдЬрд╛рддрд╛ рд╣реИ, рдЙрджрд╛рд╣рд░рдг рдХреЗ рд▓рд┐рдП, рд╢рд╛рдЗрдиреИрдбрдмреЛрд░реНрдб рдХрд╛ рдЙрдкрдпреЛрдЧ рдХрд░рдХреЗред рдЬрдм рднреА рдореБрдЭреЗ рдХреБрдЫ рдЬрдЯрд┐рд▓ рдкрд░ рдХрд╛рдо рд╢реБрд░реВ рдХрд░рдиреЗ рд╕реЗ рдкрд╣рд▓реЗ рдореБрдЭреЗ рдПрдХ рд╕рд░рд▓ рдкреНрд░реЛрдЯреЛрдЯрд╛рдЗрдк рдХрдВрдЯреНрд░реЛрд▓ рдкреИрдирд▓ рдмрдирд╛рдиреЗ рдХреА рдЖрд╡рд╢реНрдпрдХрддрд╛ рд╣реЛрддреА рд╣реИ, рддреЛ рдореИрдВ рдлреНрд▓реЗрдХреНрд╕рдбреИрд╢рдмреЛрд░реНрдб рдХрд╛ рдЙрдкрдпреЛрдЧ рдХрд░рддрд╛ рд╣реВрдВред рдпрд╣ рд╕реБрд╡рд┐рдзрд╛ рдЖрдкрдХреЛ рдПрдХ рдШрдВрдЯреЗ рдореЗрдВ рдПрдХ рдкреНрд░реЛрдЯреЛрдЯрд╛рдЗрдк рдмрдирд╛рдиреЗ рдХреА рдЕрдиреБрдорддрд┐ рджреЗрддреА рд╣реИред
R Shiny рдореЗрдВ Req рдФрд░ рд╕рддреНрдпрд╛рдкрди рдХрд╛рд░реНрдп
рдЖрд░ рд╢рд╛рдЗрдиреА рдореЗрдВ рд╡рд┐рдХрд╛рд╕ рдЖрдкрдХреЛ рднреНрд░рдорд┐рдд рдХрд░ рд╕рдХрддрд╛ рд╣реИ, рдЦрд╛рд╕рдХрд░ рдЬрдм рдЖрдкрдХреЛ рд▓рдЧрд╛рддрд╛рд░ рдЕрдЬреАрдм рддреНрд░реБрдЯрд┐ рд╕рдВрджреЗрд╢ рдорд┐рд▓рддреЗ рд╣реИрдВ рдЬреЛ рдпрд╣ рд╕рдордЭрдирд╛ рдЕрд╕рдВрднрд╡ рдмрдирд╛рддреЗ рд╣реИрдВ рдХрд┐ рдХреНрдпрд╛ рд╣реЛ рд░рд╣рд╛ рд╣реИред рд▓реЗрдХрд┐рди рд╕рдордп рдХреЗ рд╕рд╛рде, рдЪрдордХрджрд╛рд░ рд╡рд┐рдХрд╕рд┐рдд рд╣реЛрддрд╛ рд╣реИ рдФрд░ рдмреЗрд╣рддрд░ рд╣реЛрддрд╛ рд╣реИ, рдЕрдзрд┐рдХ рд╕реЗ рдЕрдзрд┐рдХ рдХрд╛рд░реНрдп рдпрд╣рд╛рдВ рджрд┐рдЦрд╛рдИ рджреЗрддреЗ рд╣реИрдВ рдЬреЛ рдЖрдкрдХреЛ рддреНрд░реБрдЯрд┐ рдХреЗ рдХрд╛рд░рдг рдХреЛ рд╕рдордЭрдиреЗ рдХреА рдЕрдиреБрдорддрд┐ рджреЗрддреЗ рд╣реИрдВред рдЗрд╕рд▓рд┐рдП, рд╕рдорд╕реНрдпрд╛ рдХреЛ "рдореМрди" рддреНрд░реБрдЯрд┐ рдХреЗ рд╕рд╛рде рд╣рд▓ рдХрд┐рдпрд╛ рдЬрд╛рддрд╛ рд╣реИ, рдЬрдм рд╕рд╛рдорд╛рдиреНрдп рддреМрд░ рдкрд░ рдпрд╣ рд╕реНрдкрд╖реНрдЯ рдирд╣реАрдВ рд╣реЛрддрд╛ рд╣реИ рдХрд┐ рдорд╛рдорд▓рд╛ рдХреНрдпрд╛ рд╣реИред рдЗрд╕рдХреЗ рд╕рд╛рде, рдЖрдк рдкрд┐рдЫрд▓реЗ рдХрд╛рд░реНрдпреЛрдВ рд╕реЗ рдЬреБрдбрд╝реЗ рдЙрдкрдпреЛрдЧрдХрд░реНрддрд╛ рдЗрдВрдЯрд░рдлрд╝реЗрд╕ рддрддреНрд╡реЛрдВ рдХреЛ рдкреНрд░рджрд░реНрд╢рд┐рдд рдХрд░ рд╕рдХрддреЗ рд╣реИрдВред рдЖрдЗрдП рдПрдХ рдЙрджрд╛рд╣рд░рдг рд╕реЗ рд╕реНрдкрд╖реНрдЯ рдХрд░реЗрдВ:
рдЖрдЙрдЯрдкреБрдЯ $ go_button <- рдЪрдордХрджрд╛рд░ :: рдкреНрд░рд╕реНрддреБрдд рдХрд░рдирд╛ ({
# рдХреЗрд╡рд▓ рдкреНрд░рджрд░реНрд╢рди рдмрдЯрди рдпрджрд┐ рдХреЛрдИ рдкрд╢реБ рдЗрдирдкреБрдЯ рдЪреБрдирд╛ рдЧрдпрд╛ рд╣реИ
рдЪрдордХрджрд╛рд░ :: рд░реАрдХ (рдЗрдирдкреБрдЯ $ рдЬрд╛рдирд╡рд░)
# рдбрд┐рд╕реНрдкреНрд▓реЗ рдмрдЯрди
рдЪрдордХрджрд╛рд░ :: рдПрдХреНрд╢рдирдмрдЯрди ("рдЬрд╛рдУ")
рдкреЗрд╕реНрдЯ ("рдЖрдЪрд░рдг", рдЗрдирдкреБрдЯ $ рдЬрд╛рдирд╡рд░, "рд╡рд┐рд╢реНрд▓реЗрд╖рдг!")
)
})рдорд╛рдиреНрдп рдХрд░реЗрдВ () рд░реЗрдВрдбрд░ рдХрд░рдиреЗ рд╕реЗ рдкрд╣рд▓реЗ рд╕рдм рдХреБрдЫ рдЪреЗрдХ рдХрд░рддрд╛ рд╣реИ рдФрд░ рдЖрдкрдХреЛ рдПрдХ рддреНрд░реБрдЯрд┐ рд╕рдВрджреЗрд╢ рдкреНрд░рджрд░реНрд╢рд┐рдд рдХрд░рдиреЗ рдХреА рдЕрдиреБрдорддрд┐ рджреЗрддрд╛ рд╣реИ - рдЙрджрд╛рд╣рд░рдг рдХреЗ рд▓рд┐рдП, рдХрд┐ рдЙрдкрдпреЛрдЧрдХрд░реНрддрд╛ рдиреЗ рдЧрд▓рдд рдлрд╝рд╛рдЗрд▓ рдЕрдкрд▓реЛрдб рдХреА рд╣реИ:
# рд╕реАрдПрд╕рд╡реА рдЗрдирдкреБрдЯ рдлрд╝рд╛рдЗрд▓ рдкреНрд░рд╛рдкреНрдд рдХрд░реЗрдВ
inFile <- рдЗрдирдкреБрдЯ $ file1
рдбреЗрдЯрд╛ <- inFile $ datapath
# рд░реЗрдВрдбрд░ рдЯреЗрдмрд▓ рдХреЗрд╡рд▓ рдЕрдЧрд░ рдпрд╣ рдХреБрддреНрддреЛрдВ рд╣реИ
рдЪрдордХрджрд╛рд░ :: рдкреНрд░рд╕реНрддреБрдд рдХрд░рдиреЗ рдпреЛрдЧреНрдп ({
# рдЬрд╛рдВрдЪреЗрдВ рдХрд┐ рдпрд╣ рдХреБрддреНрддреЗ рдХреА рдлрд╛рдЗрд▓ рд╣реИ, рди рдХрд┐ рдмрд┐рд▓реНрд▓рд┐рдпреЛрдВ рдпрд╛ рдЦрд░рдЧреЛрд╢реЛрдВ рдХреА
рдЪрдордХрджрд╛рд░ :: рдорд╛рдиреНрдп
рдЬрд░реВрд░рдд ("рдХреБрддреНрддреЗ рдХрд╛ рдирд╛рдо"% рдореЗрдВ% colnames (рдбреЗрдЯрд╛)),
"рдбреЙрдЧ рдирд╛рдо рдХреЙрд▓рдо рдирд╣реАрдВ рдорд┐рд▓рд╛ - рдХреНрдпрд╛ рдЖрдкрдиреЗ рд╕рд╣реА рдлрд╝рд╛рдЗрд▓ рд▓реЛрдб рдХреА рд╣реИ?"
)
рдбреЗрдЯрд╛
})рдЗрди рд╕рднреА рдХрд╛рд░реНрдпреЛрдВ рдХреЗ рдмрд╛рд░реЗ рдореЗрдВ рдЕрдзрд┐рдХ рдЬрд╛рдирдХрд╛рд░реА
рдпрд╣рд╛рдВ рдкрд╛рдИ рдЬрд╛ рд╕рдХрддреА рд╣реИ ред
рд╕рд┐рд╕реНрдЯрдо рд╡рд╛рддрд╛рд╡рд░рдг рдореЗрдВ рдЕрдкрдиреЗ рд▓рд┐рдП рдЕрдкрдиреА рд╕рд╛рдЦ рдХрд╛ рднрдВрдбрд╛рд░рдг рдХрд░рдирд╛
рдпрджрд┐ рдЖрдк рдЙрд╕ рдХреЛрдб рдХреЛ рд╕рд╛рдЭрд╛ рдХрд░рдиреЗ рдХреА рдпреЛрдЬрдирд╛ рдмрдирд╛рддреЗ рд╣реИрдВ рдЬрд╣рд╛рдВ рдЖрдк рдПрдХреНрд╕реЗрд╕ рдбреЗрдЯрд╛ рджрд░реНрдЬ рдХрд░рдирд╛ рдЪрд╛рд╣рддреЗ рд╣реИрдВ, рддреЛ рд╕рд┐рд╕реНрдЯрдо рд╡рд╛рддрд╛рд╡рд░рдг рдХрд╛ рдЙрдкрдпреЛрдЧ рдХрд░реЗрдВ рддрд╛рдХрд┐ Github рдпрд╛ рдХрд┐рд╕реА рдЕрдиреНрдп рд╕реЗрд╡рд╛ рдореЗрдВ рдЕрдкрдиреА рдЦреБрдж рдХреА рдХреНрд░реЗрдбреЗрдВрд╢рд┐рдпрд▓реНрд╕ рд░рдЦрдиреЗ рд╕реЗ рдмрдЪреЗрдВред рдкреНрд▓реЗрд╕рдореЗрдВрдЯ рдЙрджрд╛рд╣рд░рдг:
Sys.setenv (
DSN = "рдбреЗрдЯрд╛рдмреЗрд╕_рдирд╛рдо",
UID = "рдЙрдкрдпреЛрдЧрдХрд░реНрддрд╛ рдЖрдИрдбреА",
рдкрд╛рд╕ = "рдкрд╛рд╕рд╡рд░реНрдб"
)рдЕрдм рдЖрдк рдкрд░реНрдпрд╛рд╡рд░рдг рдЪрд░ рдХрд╛ рдЙрдкрдпреЛрдЧ рдХрд░рдХреЗ рд▓реЙрдЧ рдЗрди рдХрд░ рд╕рдХрддреЗ рд╣реИрдВ:
db <- DBI :: dbConnect (
drv = odbc :: odbc (),
dsn = Sys.getenv ("DSN"),
uid = Sys.getenv ("UID"),
pwd = Sys.getenv ("рдкрд╛рд╕")
)рдпрд╣ рдФрд░ рднреА рд╕реБрд╡рд┐рдзрд╛рдЬрдирдХ рд╣реИ (рдЦрд╛рд╕рдХрд░ рдпрджрд┐ рдЖрдк рдЕрдХреНрд╕рд░ рдбреЗрдЯрд╛ рдХрд╛ рдЙрдкрдпреЛрдЧ рдХрд░рддреЗ рд╣реИрдВ) рдЙрдиреНрд╣реЗрдВ рдСрдкрд░реЗрдЯрд┐рдВрдЧ рд╕рд┐рд╕реНрдЯрдо рдореЗрдВ рд╕реАрдзреЗ рдкрд░реНрдпрд╛рд╡рд░рдг рдЪрд░ рдХреЗ рд░реВрдк рдореЗрдВ рд╕реЗрдЯ рдХрд░рдиреЗ рдХреЗ рд▓рд┐рдПред рдЗрд╕ рд╕реНрдерд┐рддрд┐ рдореЗрдВ, рд╡реЗ рд╣рдореЗрд╢рд╛ рдЙрдкрд▓рдмреНрдз рд░рд╣реЗрдВрдЧреЗ рдФрд░ рдЖрдкрдХреЛ рдЙрдиреНрд╣реЗрдВ рдХреЛрдб рдореЗрдВ рдирд┐рд░реНрджрд┐рд╖реНрдЯ рдирд╣реАрдВ рдХрд░рдирд╛ рдкрдбрд╝реЗрдЧрд╛ред
рд╕реНрдЯрд╛рдЗрд▓рд░ рдХреЗ рд╕рд╛рде Tidyverse рд╕реНрд╡рдЪрд╛рд▓рди
рд╕реНрдЯрд╛рдЗрд▓рд░ рдкреИрдХреЗрдЬ рдХреЛрдб рдХреЛ рд╕рд╛рдл рдХрд░рдиреЗ рдореЗрдВ рдорджрдж рдХрд░ рд╕рдХрддрд╛ рд╣реИ, рдЬрд┐рд╕рдореЗрдВ рдХреЛрдб рд╢реИрд▓реА рдХреЛ рд╕реНрд╡рдЪрд╛рд▓рд┐рдд рд░реВрдк рд╕реЗ рдкрд░рд┐рд╡рд░реНрддрд┐рдд рдХрд░рдиреЗ рдХреЗ рд▓рд┐рдП рдХрдИ рд╡рд┐рд╢реЗрд╖рддрд╛рдПрдВ рд╣реИрдВред рдЗрд╕рдХреЗ рд▓рд┐рдП рдЬреЛ рдХреБрдЫ рднреА рдЖрд╡рд╢реНрдпрдХ рд╣реИ рд╡рд╣ рд╣реИ рд╕реНрдЯрд╛рдЗрд▓рд░ :: style_file () рдЖрдкрдХреА рд╕рдорд╕реНрдпрд╛рдЧреНрд░рд╕реНрдд рд╕реНрдХреНрд░рд┐рдкреНрдЯ рдХреЗ рд▓рд┐рдПред рдЖрджреЗрд╢ рдХреЛ рдмрд╣рд╛рд▓ рдХрд░рдиреЗ рдХреЗ рд▓рд┐рдП рдкреИрдХреЗрдЬ рдмрд╣реБрдд рдХреБрдЫ рдХрд░реЗрдЧрд╛ (рд▓реЗрдХрд┐рди рд╕рднреА рдирд╣реАрдВ)ред
рджрд╕реНрддрд╛рд╡реЗрдЬрд╝ рдкреИрд░рд╛рдореАрдЯрд░ рдЖрд░ рдорд╛рд░реНрдХрдбрд╛рдЙрди
рддреЛ, рдЖрдкрдиреЗ рдПрдХ рдЙрддреНрдХреГрд╖реНрдЯ рдЖрд░ рдорд╛рд░реНрдХрдбрд╛рдЙрди рджрд╕реНрддрд╛рд╡реЗрдЬрд╝ рдмрдирд╛рдпрд╛ рд╣реИ рдЬрд┐рд╕рдореЗрдВ рдЖрдк рдХреБрддреНрддреЛрдВ рдХреЗ рдмрд╛рд░реЗ рдореЗрдВ рд╡рд┐рднрд┐рдиреНрди рддрдереНрдпреЛрдВ рдХрд╛ рд╡рд┐рд╢реНрд▓реЗрд╖рдг рдХрд░рддреЗ рд╣реИрдВред рдФрд░ рдлрд┐рд░ рдЖрдкрдХреЗ рд╕рд╛рде рдРрд╕рд╛ рд╣реЛрддрд╛ рд╣реИ рдХрд┐ рдПрдХ рд╣реА рдХрд╛рдо рдХрд░рдирд╛ рдмреЗрд╣рддрд░ рд╣реЛрдЧрд╛, рд▓реЗрдХрд┐рди рдХреЗрд╡рд▓ рдмрд┐рд▓реНрд▓рд┐рдпреЛрдВ рдХреЗ рд╕рд╛рдеред рдпрд╣ рдареАрдХ рд╣реИ, рдЖрдк рд╕рд┐рд░реНрдл рдПрдХ рдХрдорд╛рдВрдб рд╕реЗ рдмрд┐рд▓реНрд▓рд┐рдпреЛрдВ рдХреА рд░рд┐рдкреЛрд░реНрдЯрд┐рдВрдЧ рдХреЛ рд╕реНрд╡рдЪрд╛рд▓рд┐рдд рдХрд░ рд╕рдХрддреЗ рд╣реИрдВред рдРрд╕рд╛ рдХрд░рдиреЗ рдХреЗ рд▓рд┐рдП, рдЖрдкрдХреЛ рдХреЗрд╡рд▓ рдЕрдкрдиреЗ рдЖрд░ рдорд╛рд░реНрдХрдбрд╛рдЙрди рджрд╕реНрддрд╛рд╡реЗрдЬрд╝ рдХреЛ рдкреИрд░рд╛рдореАрдЯрд░ рдХрд░рдирд╛ рд╣реЛрдЧрд╛ред
рдЖрдк рдирд┐рд░реНрджрд┐рд╖реНрдЯ рджрд╕реНрддрд╛рд╡реЗрдЬрд╝ рдореЗрдВ YAML рд╣реЗрдбрд░ рдХреЗ рд▓рд┐рдП рдкреИрд░рд╛рдореАрдЯрд░ рд╕реЗрдЯ рдХрд░рдХреЗ рдРрд╕рд╛ рдХрд░ рд╕рдХрддреЗ рд╣реИрдВ, рдФрд░ рдЙрд╕рдХреЗ рдмрд╛рдж рдорд╛рди рдкреИрд░рд╛рдореАрдЯрд░ред
- рд╢реАрд░реНрд╖рдХ: "рдкрд╢реБ рд╡рд┐рд╢реНрд▓реЗрд╖рдг"
рд▓реЗрдЦрдХ: "рдХреАрде рдореИрдХрдиреЗрдХрд▓"
рджрд┐рдирд╛рдВрдХ: "21 рдорд╛рд░реНрдЪ 2019"
рдЙрддреНрдкрд╛рджрди:
html_document:
code_folding: "hide"
рдкреИрд░рд╛рдореАрдЯрд░:
animal_name:
рдореВрд▓реНрдп: рдХреБрддреНрддрд╛
рд╡рд┐рдХрд▓реНрдк:
- рдХреБрддреНрддрд╛
- рдмрд┐рд▓реНрд▓реА
- рдЦрд░рдЧреЛрд╢
years_of_study:
рдЗрдирдкреБрдЯ: рд╕реНрд▓рд╛рдЗрдбрд░
рдорд┐рдирдЯ: 2000
рдЕрдзрд┐рдХрддрдо: 2019
рдЪрд░рдг: рез
рджреМрд░: 1
sep: ''
рдореВрд▓реНрдп: [2010, 2017]
---рдЕрдм рдЖрдк рдбреЙрдХреНрдпреВрдореЗрдВрдЯ рдХреЛрдб рдореЗрдВ рд╕рднреА рд╡реЗрд░рд┐рдПрдмрд▓реНрд╕ рдХреЛ params $ animal_name рдФрд░ params $ years_of_study рдХреЗ рд░реВрдк рдореЗрдВ рд░рдЬрд┐рд╕реНрдЯрд░ рдХрд░ рд╕рдХрддреЗ рд╣реИрдВред рдлрд┐рд░ рд╣рдо рдирд┐рдЯ рдбреНрд░реЙрдк-рдбрд╛рдЙрди рдореЗрдиреВ (рдпрд╛ knit_with_parameters ()) рдХрд╛ рдЙрдкрдпреЛрдЧ рдХрд░реЗрдВрдЧреЗ рдФрд░ рдорд╛рдкрджрдВрдбреЛрдВ рдХрд╛ рдЪрдпрди рдХрд░рдиреЗ рдХрд╛ рдЕрд╡рд╕рд░ рдкреНрд░рд╛рдкреНрдд рдХрд░реЗрдВрдЧреЗред

revealjs
рдШреЛрд╖рдгрд╛рдкрддреНрд░ - рдПрдХ рдкреИрдХреЗрдЬ рдЬреЛ рдЖрдкрдХреЛ рдЕрдВрддрд░реНрдирд┐рд╣рд┐рдд рдЖрд░-рдХреЛрдб, рд╕рд╣рдЬ рдЬреНрдЮрд╛рди рдпреБрдХреНрдд рдиреЗрд╡рд┐рдЧреЗрд╢рди рдФрд░ рд╕реНрд▓рд╛рдЗрдб рдореЗрдиреВ рдХреЗ рд╕рд╛рде рдорд╣рд╛рди HTML-рдкреНрд░рд╕реНрддреБрддрд┐рдпреЛрдВ рдХреЛ рдмрдирд╛рдиреЗ рдХреА рдЕрдиреБрдорддрд┐ рджреЗрддрд╛ рд╣реИред HTML рд╢реЙрд░реНрдЯрдХрдЯ рдЖрдкрдХреЛ рд╡рд┐рднрд┐рдиреНрди рд╢реИрд▓рд┐рдпреЛрдВ рдХреЗ рд╕рд╛рде рдЬрд▓реНрджреА рд╕реЗ рдиреЗрд╕реНрдЯреЗрдб рд╕реНрд▓рд╛рдЗрдб рд╕рдВрд░рдЪрдирд╛ рдмрдирд╛рдиреЗ рдХреА рдЕрдиреБрдорддрд┐ рджреЗрддреЗ рд╣реИрдВред рдЦреИрд░, HTML рдХрд┐рд╕реА рднреА рдбрд┐рд╡рд╛рдЗрд╕ рдкрд░ рдЪрд▓реЗрдЧрд╛, рдЗрд╕рд▓рд┐рдП рдкреНрд░реЗрдЬреЗрдВрдЯреЗрд╢рди рд╣рд░ рдлреЛрди, рдЯреИрдмрд▓реЗрдЯ рдпрд╛ рд▓реИрдкрдЯреЙрдк рдкрд░ рдЦреЛрд▓рд╛ рдЬрд╛ рд╕рдХрддрд╛ рд╣реИред рдЬрд╛рдирдХрд╛рд░реА рдХрд╛ рдкреНрд░рдХрдЯрди рдкреИрдХреЗрдЬ рдХреЛ рд╕реНрдерд╛рдкрд┐рдд рдХрд░рдХреЗ рдФрд░ рдЗрд╕реЗ YAML рд╣реЗрдбрд░ рдореЗрдВ рдХреЙрд▓ рдХрд░рдХреЗ рдХреЙрдиреНрдлрд╝рд┐рдЧрд░ рдХрд┐рдпрд╛ рдЬрд╛ рд╕рдХрддрд╛ рд╣реИред рдпрд╣рд╛рдБ рдПрдХ рдЙрджрд╛рд╣рд░рдг рд╣реИ:
- рд╢реАрд░реНрд╖рдХ: "рд▓реЛрдЧ рдПрдирд╛рд▓рд┐рдЯрд┐рдХреНрд╕ рдпреВрдирд┐рд╡рд░реНрд╕ рдХреЗ рдХрд┐рдирд╛рд░реЗ рдХреЛ рдЫреЛрдбрд╝рдХрд░"
рд▓реЗрдЦрдХ: "рдХреАрде рдореИрдХрдиреЗрдХрд▓"
рдЙрддреНрдкрд╛рджрди:
revjjs :: revjs_pretation:
рдХреЗрдВрджреНрд░: рд╣рд╛рдБ
рд╕рд╛рдБрдЪрд╛: starwars.html
рд╡рд┐рд╖рдп: рдХрд╛рд▓рд╛
рджрд┐рдирд╛рдВрдХ: "рдПрдЪрдЖрд░ рдПрдирд╛рд▓рд┐рдЯрд┐рдХреНрд╕ рдореАрдЯрдЕрдк рд▓рдВрджрди - 18 рдорд╛рд░реНрдЪ, 2019"
resource_files:
- darth.png
- deathstar.png
- hanchewy.png
- рд╕рд╣рд╕реНрд░рд╛рдмреНрджреА
- r2d2-threepio.png
- starwars.html
- starwars.png
- рд╕реНрдЯреЙрд░реНрдордЯреНрд░реЙрдкрд░.рдкрдВрдЧ
---рдкреНрд░рд╕реНрддреБрддрд┐ рдХрд╛ рд╕реНрд░реЛрдд рдХреЛрдб
рдпрд╣рд╛рдВ рдкреЛрд╕реНрдЯ рдХрд┐рдпрд╛ рдЧрдпрд╛ рд╣реИ , рдФрд░ <a
href=foreign rpubs.com/keithmcn рд╕рдВрдХрд╛рдп/hr_meetup_london'> рдкреНрд░рд╕реНрддреБрддрд┐ рдпрд╣рд╛рдВ рдореМрдЬреВрдж рд╣реИред

рдПрдЪ рд╢рд╛рдЗрдиреА рдореЗрдВ HTML рдЯреИрдЧ
рдЬреНрдпрд╛рджрд╛рддрд░ рдкреНрд░реЛрдЧреНрд░рд╛рдорд░ рдЙрд╕ HTML рдЯреИрдЧ рдХрд╛ рдкреВрд░рд╛ рдлрд╛рдпрджрд╛ рдирд╣реАрдВ рдЙрдард╛рддреЗ рд╣реИрдВ рдЬреЛ R Shiny рдХреЗ рдкрд╛рд╕ рд╣реИред рд▓реЗрдХрд┐рди рдпреЗ рд╕рд┐рд░реНрдл 110 рдЯреИрдЧ рд╣реИрдВ рдЬреЛ HTML рдлрд╝рдВрдХреНрд╢рди рдпрд╛ рдореАрдбрд┐рдпрд╛ рдкреНрд▓реЗрдмреИрдХ рдХреЗ рд▓рд┐рдП рдПрдХ рдЫреЛрдЯреА рдХреЙрд▓ рдмрдирд╛рдиреЗ рдХреЗ рд▓рд┐рдП рд╕рдВрднрд╡ рдмрдирд╛рддреЗ рд╣реИрдВред рдЙрджрд╛рд╣рд░рдг рдХреЗ рд▓рд┐рдП, рдореИрдВрдиреЗ рд╣рд╛рд▓ рд╣реА рдореЗрдВ "рдЬреАрддрдиреЗ" рд╡рд╛рд▓реА рдзреНрд╡рдирд┐ рдХреЛ рдЪрд▓рд╛рдиреЗ рдХреЗ рд▓рд┐рдП $ рдСрдбрд┐рдпреЛ рдХрд╛ рдЙрдкрдпреЛрдЧ рдХрд┐рдпрд╛, рдЬрд┐рд╕рдиреЗ рдЙрдкрдпреЛрдЧрдХрд░реНрддрд╛ рдХреЛ рдПрдХ рдХрд╛рд░реНрдп рдкреВрд░рд╛ рд╣реЛрдиреЗ рдХреЗ рдмрд╛рд░реЗ рдореЗрдВ рдЪреЗрддрд╛рд╡рдиреА рджреАред
рдкреИрдХреЗрдЬ рдХреА рдкреНрд░рд╢рдВрд╕рд╛ рдХрд░реЗрдВ
рдЗрд╕ рдкреИрдХреЗрдЬ рдХрд╛ рдЙрдкрдпреЛрдЧ рдХрд░рдирд╛ рдмрд╣реБрдд рд╕рд░рд▓ рд╣реИ, рд▓реЗрдХрд┐рди рдЖрдкрдХреЛ рдЙрдкрдпреЛрдЧрдХрд░реНрддрд╛ рдХреА рдкреНрд░рд╢рдВрд╕рд╛ рдкреНрд░рджрд░реНрд╢рд┐рдд рдХрд░рдиреЗ рдХреА рдЖрд╡рд╢реНрдпрдХрддрд╛ рд╣реИред рдпрд╣ рдЕрдЬреАрдм рд▓рдЧрддрд╛ рд╣реИ, рд▓реЗрдХрд┐рди рд╡реЗ рд╡рд╛рд╕реНрддрд╡ рдореЗрдВ рдЗрд╕реЗ рдкрд╕рдВрдж рдХрд░рддреЗ рд╣реИрдВред

рд╕реНрдХрд┐рд▓рдмреЙрдХреНрд╕ рдЕрдиреБрд╢рдВрд╕рд╛ рдХрд░рддрд╛ рд╣реИ: