# Cviceni 12

# 1. 
# Vytvorte funkci, ktera pro zadane cislo vypise zda je zaporne, kladne a nebo rovno nule.
# Vystupem funkce bude hodnota -1, 1, resp. 0.


# 2. 
# Vytvorte funkci, ktera pro zadane cislo vrati nazev dne v tydnu (1 => pondeli, ..., 7 => nedele). 


# 3. 
# Vytvorte funkci, ktera pro zadany numericky vektor spocita kumulovane soucty a souciny 
# a vraci je na svem vystupu. 
# Poznamka: Spravnost sve funkce muzete zkontrolovat pomoci "cumsum" a "cumprod". 


# 4. 
# Vytvorte funkci, ktera pro zadane prirozene cislo "n" spocita a na svuj vystup vrati 
# Fibonacciho posloupnost delky "n". 


# 5. 
# S vyuzitim funkce "sapply" pro kazdy clen "x" posloupnosti celych cisel od -10 do 25 spocitejte: 
# * pro x >=  5: druhou odmocninu z (x - 5), 
# * pro x <= -5: absolutni hodnotu z x pro x, 
# * pro ostatni "x" bude vysledek rovny nule. 


# 6. 
# Vygenerujte ctvercovou matici "A" radu 5 s celociselnymi nahodnymi hodnotami z intervalu [-5; 5]. 
# Pomoci funkce "apply" a vhodne vytvorenych funkci spocitejte: 
# * minimum v kazdem radku / kazdem sloupci, 
# * maximum v kazdem radku / kazdem sloupci, 
# * prumer v kazdem radku / kazdem sloupci, 
# * soucet absolutnich hodnot v kazdem radku / kazdem sloupci, 
# * rozdil maximalni a minimalni hodnoty / kazdem sloupci. 


# 7. 
# S vyuzitim funkce "tapply" spocitejte v uloze se souborem "seniori.csv" z 10. cviceni 
# prumer BMI pro zeny a pro muze jednim prikazem. 


# 8. 
# Nactete datovy soubor "vejce.Rdata", obsahujici udaje o velikosti vajec kukacky 
# v zavislosti na velikosti vajec hostitele. 
# Metodou nejmensich ctvercu odvodte a v R spocitejte koeficienty primky, popisuji tuto zavislost. 
# Do jednoho grafu zakreslete zdrojova data i vyslednou primku. 
# Poznamka: Jedna se o tzv. regresni primku, vysledek si muzete zkontrolovat pomoci funkce "lm".