1. feladat:
a) Készítsünk egy v1 nevű vektort, mely az 1, 2 és 4 elemeket tartalmazza
b) Készítsünk egy v2 nevű vektort az első 30 pozitív egész számból áll.
c) Készítsünk egy 30 hosszú v3 nevű vektort, melyben az 1, 2, 3 számok ismétlődnek (tízsszer).
d) Készítsünk egy v4 nevű vektort, melyben az első 30 négyzetszám van: (1, 4, ..., 900).
e) Készítsünk egy m nevű mátrixot, melynek három oszlopa és 40 sora van: az első oszlopban a páros számok 2-től 80-ig, a második oszlopban felváltva -1 és 1, a harmadik oszlopban pedig végig -2.718 szerepeljen.

2. Az alábbi paranccsal hozzunk létre egy vektort:
V <- 1:200+round(rnorm(200)*20)
a) Listázzuk ki V azon elemeit, melyek 10-nél nagyobbak és párosak.
b) Listázzuk ki V azon elemeit, melyek páratlanok.
c) Számoljuk meg, hány 0 és 20 közötti páros eleme van V-nek.

3. Futtassuk le az alábbi parancsokat, ezáltal létrehozva 5 darab véletlenszerű vektort, melyekben egy elképzelt állatfaj 30 példányának faja, életkora, testsúlya és magassága szerepel:

species = sample(c('spec1', 'spec2', 'spec3'), 30, replace=TRUE)
gender = sample(c('male', 'female'), 30, replace=TRUE)
age = rnorm(30, 5.2, 1)
weight = rnorm(30, 13, 2)
height = rnorm(30, 100, 20)

Készítsünk egy adattáblát, melynek 30 sora van, és a fenti öt vektor alkotja az oszlopait. Számítsuk ki a testsúlyok átlagát, a magasságok minimumát, a 2-es fajú hím egyedek súlyának minimumát. Írjuk ki magasság szerinti növekvő sorrendben a táblázat sorait.

4. Töltsük le a http://math.bme.hu/~bdavid mappából a jegyek.csv nevű fájlt, és olvassuk be egy adattáblába (a fájl első sora az oszlopok nevét tartalmazza). Ezután hajtsuk végre a következő műveleteket:
a) Rendezzük a táblázat sorait az 'fizika' oszlop szerint.
b) Írjuk ki csak azokat a sorokat, melyekben a fizika és matematika is 5.
c) Mennyi volt a kémia átlaga az 5-ös matekosoknak?

5. Készítsünk ábrákat a következő adatok alapján:
a) Ábrázoljuk az state.x77 tábla 'Illiteracy' és 'Murder' értékeit egy grafikonon.
b) Készítsünk hisztogramot az mtcars tábla 'cyl' oszlopaiban szereplő értékek gyakoriságából.

6. Generáljunk le 1000 db kockadobást kétszer és ezeket tároljuk el kocka1 és kocka2 néven. Adjuk össze a két kockadobást és írjunk egy függvényt, amely megszámolja, hogy hány dobás esett 6 és 8 közé.

7. A következő függvénnyel lehet 1 db cinkelt érmédobást készíteni:
sample(c("F","I"),prob=c(1/3,2/3))
Átlagosan mennyit kell dobni a kockával, hogy kijöjjön 10 fej?

8. Töltsük le a Salaries.xlsx fájlt és oldjuk meg a benne található feladatokat!