przewodnikPoPakiecieR3

278 Zadania

Zadania do rozdziału „pazuRrry”

R Zadanie 2.1

Odczytaj ramkę danych z zadania 1.13. Następnie zamień dane liczbowe z kolumny Wiek na zmienna czynnikową, dzieląc: pacjentki na 3 grupy: o wieku do 45 lat, o wieku powyżej 55 lat i o wieku pośrednim. Poziomy w zmiennej czynnikowej powinny nazywać się następująco: "wiek <45", "45<= wiek <=55", "wiek >55".

Następnie wyświetl macierz kontyngencji dla tej zmiennej.

Wyświetl też macierz kontyngencji dla pary zmiennych czynnikowych, uzyskanej na bazie wieku oraz dla płci.

Dodaj sumy brzegowe dla tej macierzy.

Wyświetl płaską macierz kontyngencji dla trójki zmiennych czynnikowych, dwóch powyższych i jeszcze zmiennej WIT.

R.R. Zadanie 2.2

Pod adresem http: //www. biecek. pl/R/dane/imieniny. txt znajduje się plik tekstowy z imionami i datami imienin dla kolejnych irnion. Plik jest w dosyć kłopotliwym formacie, mianowicie w każdym wierszu w pierwszej pozycji znajduje się imię, a po nim występują daty imienin. Wszystkie te pola rozdzielone są spacją. Ponieważ jednak różne imiona mają różne liczby imienin dane te nie są w postaci tabelarycznej.

Odczytaj dane tak, by każdy wiersz byl jednym polem (można np. za separator wskazać ; nie występuje on w tym pliku, cała linia zostanie więc traktowana jako jedno pole). Pamiętaj przy tym, że domyślnie pola tekstowe konwertowane są na zmienne czynnikowe. Zamień odczytane dane na wektor zmiennych typu znakowego.

Sprawdź ile imiona znajduje się w tym pliku z danymi.

RRR Zadanie 2.3

Po odczytaniu danych z zadania 2.2 użyj funkcji strsplitO i sapplyO, by z odczytanych danych wydobyć tylko informacje o imionach.

Zlicz liczby znaków w kolejnych imionach i wyznacz macierz kontyngencji opisującą ile imion ma określoną długość.

Od tej reguły są wyjątki np. żeńskie imię Beatrycze i męskie Bonawentura. Dla uproszczenia zapomnijmy o wyjątkach.

Sprawdź, które imię ma najwięcej znaków i które imiona mają najmniej znaków.

Większość imion żeńskich kończy się literą ’a\ wykorzystując tę informację zlicz liczbę żeńskich imion.

Sprawdź ile liter rozpoczyna się literą A, ile B, ile C itp.

Sprawdź, które imiona kończą się suffixem anna.

Polskie litery występujące w imionach zamień na odpowiedniki łacińskie, np. ą na a, ź na z itp. Sprawdź, ile imion zawierało polskie litery.

RR. Zadanie 2.4

Po odczytaniu danych z powyższego zadania sprawdź, kto ma imieniny 30 października. Wyświetl te imiona w porządku leksykograficznym.

Sprawdź, które imię ma najczęściej imieniny.

Sprawdź, w którym dniu roku najwięcej imion ma imieniny. Sprawdź, w którym dniu miesiąca a następnie, w którym miesiącu najwięcej imion ma imieniny. Na bazie wszystkich imion zrób analizę używalności poszczególnych liter. Która litera jest najpopularniejsza? Dlaczego?

R Zadanie 2.5

Odczytaj ramkę danych z zadania 1.13. Następnie używając funkcji byO wyświetl podsumowanie zmiennej Wiek osobno dla grupy WIT=brak i dla grupy WIT=obecny.

R Zadanie 2.6

Wyznacz wyznacznik, wartości własne oraz wektory własne następującej macierzy:

1    5 3

2    0 5 1 2 1

RR Zadanie 2.7

Używając funkcji outerO wyznacz tabliczkę mnożenia dla liczb mniejszych od 6.

R Zadanie 2.8

Odczytaj ramkę danych z zadania 1.13. Następnie wyznacz histogram dla zmiennej Wiek. Zapisz ten histogram do pliku c:Whist.pdf w wymiarach 5x5 cali.

RRR Zadanie 2.9

Pod adresem http://gpw.pl/ przeczytać można o aktualnych wartościach giełdowych indeksów. Odczytaj zawartość tej strony, a następnie zbuduj w R ramkę danych zawierających informację o nazwie i wartości indeksów. Zauważ, że w treści HTML strony nazwy indeksów poprzedzone są tagiem <td class="indeksy_nazwa">, podczas gdy wartości poprzedzone są tagiem <td width="80" class="indeksy_wart" align="right"> i wartości te występują w rożnych liniach.

Hint: Funkcja wywołuje maaą dodatkowych funkcji, a tylko jedną niezfc~^J**^J cayli Inlemnlf),

RR Zadanie 2.10

Używając profilera spróbuj przyśpieszyć poniższy fragment kodu. Sprawdź, które instrukcje są czasochłonne i zastąp je szybszymi. Następnie sprawdź ilukrotnie przyśpieszyłeś ten kod.

RprofCprof ller. out", interval « 0.01, memory.profillng“TRUE)

wyniki » NULL

for (i in 1:10000) {

wektorX * morm(20) wektorY = rnorm(20) wyniki fi] = cor(wektorX, wektorY)

> /:; ■ Rprof(NULL)

siunraaryRprof (“prof iler .out", memory="both")