knitr::opts_chunk$set(
  echo = TRUE,
  message = FALSE,
  warning = FALSE
)

Spracované a inšpirované receptom publikovaným na
Mamin banánový koláč – Dobré jedlo

Pečenie koláča

Tradičný kuchynský postup

Pri príprave koláča pracujeme podobne ako s databázou – každá ingrediencia má svoj význam a až ich správnym spojením vznikne výsledný koláč.

Základné suroviny

Ovocie <- c("Banán", "Banán", "Banán")
Sladkost <- c(3, 4, 2)
Konzistencia <- c("mäkká", "krémová", "jemná")
cesto <- data.frame(Ovocie, Sladkost, Konzistencia)
print(cesto)
print(cesto$Sladkost)
[1] 3 4 2
print(mean(cesto$Sladkost))
[1] 3
summary(cesto)
    Ovocie             Sladkost   Konzistencia      
 Length:3           Min.   :2.0   Length:3          
 Class :character   1st Qu.:2.5   Class :character  
 Mode  :character   Median :3.0   Mode  :character  
                    Mean   :3.0                     
                    3rd Qu.:3.5                     
                    Max.   :4.0                     

Pridanie čokolády

Cokolada <- c(TRUE, TRUE, TRUE)
cesto <- cbind(cesto, Cokolada)
print(cesto)

Nová vrstva koláča

nova.vrstva <- data.frame(
  Ovocie = "Kakao",
  Sladkost = 5,
  Konzistencia = "vláčna",
  Cokolada = TRUE
)

cesto <- rbind(cesto, nova.vrstva)
print(cesto)

Prehľad ingrediencií

library(knitr)
library(kableExtra)

kable(
  cesto,
  digits = 2,
  align = c("l","c","l","c"),
  caption = "Prehľad ingrediencií banánového koláča"
) %>%
kable_styling(
  bootstrap_options = c("striped", "hover", "condensed", "responsive"),
  full_width = FALSE,
  position = "center"
)
Prehľad ingrediencií banánového koláča
Ovocie Sladkost Konzistencia Cokolada
Banán 3 mäkká TRUE
Banán 4 krémová TRUE
Banán 2 jemná TRUE
Kakao 5 vláčna TRUE

Vizualizácia výsledku

library(ggplot2)

ggplot(cesto, aes(x = Konzistencia, y = Sladkost)) +
  geom_point(size = 3) +
  theme_minimal() +
  labs(
    title = "Textúra a sladkosť banánového koláča",
    x = "Konzistencia",
    y = "Sladkosť"
  )

Výsledok

Banánový koláč je vláčny, čokoládový a jednoduchý na prípravu.

LS0tCnRpdGxlOiAiTWFtaW4gYmFuw6Fub3bDvSBrb2zDocSNIgphdXRob3I6ICJBZGFtIE1pY2hhbGVjICA8YnI+Cihyb2Rpbm7DvSByZWNlcHQgeiBkZXRzdHZhKSIKZGF0ZTogIkRlY2VtYmVyIDIwMjUiCm91dHB1dDogCiAgaHRtbF9ub3RlYm9vazoKICAgIHRvYzogdHJ1ZQogICAgdG9jX2Zsb2F0OiB0cnVlCiAgICB0aGVtZTogdW5pdGVkCiAgICBoaWdobGlnaHQ6IHRhbmdvCmVkaXRvcl9vcHRpb25zOiAKICBtYXJrZG93bjogCiAgICB3cmFwOiA3MgotLS0KCmBgYHtyfQprbml0cjo6b3B0c19jaHVuayRzZXQoCiAgZWNobyA9IFRSVUUsCiAgbWVzc2FnZSA9IEZBTFNFLAogIHdhcm5pbmcgPSBGQUxTRQopCmBgYAoKU3ByYWNvdmFuw6kgYSBpbsWhcGlyb3ZhbsOpIHJlY2VwdG9tIHB1Ymxpa292YW7DvW0gbmEgIApbTWFtaW4gYmFuw6Fub3bDvSBrb2zDocSNIOKAkyBEb2Jyw6kgamVkbG9dKGh0dHBzOi8vZG9icmVqZWRsby5wbHVza2Euc2svdHJlbmR5L21hbWluLWJhbmFub3Z5LWtvbGFjLXBldHJhLXRvdGhvdmEtdGlldG8tc2xhdm5vc3RuZS1yZXp5LW1pbHVqZS1vZC1kZXRzdHZhKXt0YXJnZXQ9Il9ibGFuayIgcmVsPSJub29wZW5lciJ9CgojIFBlxI1lbmllIGtvbMOhxI1hCgojIyBUcmFkacSNbsO9IGt1Y2h5bnNrw70gcG9zdHVwCgpQcmkgcHLDrXByYXZlIGtvbMOhxI1hIHByYWN1amVtZSBwb2RvYm5lIGFrbyBzIGRhdGFiw6F6b3Ug4oCTIGthxb5kw6EKaW5ncmVkaWVuY2lhIG3DoSBzdm9qIHbDvXpuYW0gYSBhxb4gaWNoIHNwcsOhdm55bSBzcG9qZW7DrW0gdnpuaWtuZQp2w71zbGVkbsO9IGtvbMOhxI0uCgojIyMgWsOha2xhZG7DqSBzdXJvdmlueQoKYGBge3J9Ck92b2NpZSA8LSBjKCJCYW7DoW4iLCAiQmFuw6FuIiwgIkJhbsOhbiIpClNsYWRrb3N0IDwtIGMoMywgNCwgMikKS29uemlzdGVuY2lhIDwtIGMoIm3DpGtrw6EiLCAia3LDqW1vdsOhIiwgImplbW7DoSIpCmBgYAoKYGBge3J9CmNlc3RvIDwtIGRhdGEuZnJhbWUoT3ZvY2llLCBTbGFka29zdCwgS29uemlzdGVuY2lhKQpwcmludChjZXN0bykKYGBgCgpgYGB7cn0KcHJpbnQoY2VzdG8kU2xhZGtvc3QpCnByaW50KG1lYW4oY2VzdG8kU2xhZGtvc3QpKQpzdW1tYXJ5KGNlc3RvKQpgYGAKCiMjIFByaWRhbmllIMSNb2tvbMOhZHkKCmBgYHtyfQpDb2tvbGFkYSA8LSBjKFRSVUUsIFRSVUUsIFRSVUUpCmNlc3RvIDwtIGNiaW5kKGNlc3RvLCBDb2tvbGFkYSkKcHJpbnQoY2VzdG8pCmBgYAoKIyMgTm92w6EgdnJzdHZhIGtvbMOhxI1hCgpgYGB7cn0Kbm92YS52cnN0dmEgPC0gZGF0YS5mcmFtZSgKICBPdm9jaWUgPSAiS2FrYW8iLAogIFNsYWRrb3N0ID0gNSwKICBLb256aXN0ZW5jaWEgPSAidmzDocSNbmEiLAogIENva29sYWRhID0gVFJVRQopCgpjZXN0byA8LSByYmluZChjZXN0bywgbm92YS52cnN0dmEpCnByaW50KGNlc3RvKQpgYGAKCiMjIFByZWjEvmFkIGluZ3JlZGllbmNpw60KCmBgYHtyfQpsaWJyYXJ5KGtuaXRyKQpsaWJyYXJ5KGthYmxlRXh0cmEpCgprYWJsZSgKICBjZXN0bywKICBkaWdpdHMgPSAyLAogIGFsaWduID0gYygibCIsImMiLCJsIiwiYyIpLAogIGNhcHRpb24gPSAiUHJlaMS+YWQgaW5ncmVkaWVuY2nDrSBiYW7DoW5vdsOpaG8ga29sw6HEjWEiCikgJT4lCmthYmxlX3N0eWxpbmcoCiAgYm9vdHN0cmFwX29wdGlvbnMgPSBjKCJzdHJpcGVkIiwgImhvdmVyIiwgImNvbmRlbnNlZCIsICJyZXNwb25zaXZlIiksCiAgZnVsbF93aWR0aCA9IEZBTFNFLAogIHBvc2l0aW9uID0gImNlbnRlciIKKQpgYGAKCiMgVml6dWFsaXrDoWNpYSB2w71zbGVka3UKCmBgYHtyfQpsaWJyYXJ5KGdncGxvdDIpCgpnZ3Bsb3QoY2VzdG8sIGFlcyh4ID0gS29uemlzdGVuY2lhLCB5ID0gU2xhZGtvc3QpKSArCiAgZ2VvbV9wb2ludChzaXplID0gMykgKwogIHRoZW1lX21pbmltYWwoKSArCiAgbGFicygKICAgIHRpdGxlID0gIlRleHTDunJhIGEgc2xhZGtvc8WlIGJhbsOhbm92w6lobyBrb2zDocSNYSIsCiAgICB4ID0gIktvbnppc3RlbmNpYSIsCiAgICB5ID0gIlNsYWRrb3PFpSIKICApCmBgYAoKIyBWw71zbGVkb2sKCkJhbsOhbm92w70ga29sw6HEjSBqZSB2bMOhxI1ueSwgxI1va29sw6Fkb3bDvSBhIGplZG5vZHVjaMO9IG5hIHByw61wcmF2dS4K