Órai feladatok megoldása

Contents

1. feladat

Írjunk olyan függvényt csere(v,a,b) nevű függvényt, amely kicseréli a v vektor minden a-val egyenlő elemét b-re. Ha csere(v,a) módon hívtuk meg, akkor minden a-val egyenlő elemet 1-re cseréljen. Ha csere(v) módon, akkor pedig minden 0-t cseréljen 1-re.

function w=csere(v,a,b)

if nargin==1
    a=0; 
    b=1;
elseif nargin==2
    b=1;
end

v(v==a)=b;
w=v;

2. feladat

Ellenőrizni szeretnénk, hogy igaz-e, hogy a 90 darabos papírzsebkendőben tényleg 90 db-ot csomagol-e a gyár. Tegyük fel, hogy a gép által csomagolt zsepik számának szórása 4.5.

sampsizepwr('t',[90,4.5],89, 0.95)
ans =

   266

sampsizepwr('t',[90,4.5],89, 0.99)
ans =

   374

sampsizepwr('t',[90,4.5],89, 0.95,[],'Tail','left')
ans =

   221

sampsizepwr('t',[90,4.5],89, 0.99,[],'Tail','left')
ans =

   321

Erre már megkaptuk a választ az első részben, az alapértelmezés ugyanis a kétoldali próba.

3. feladat

Egy lázcsillapító gyógyszer hatásosságát szeretnénk tesztelni. Megmértük 10 ember hőmérsékletét a gyógyszer beadása előtt, az alábbi értékeket kaptuk: 38.1, 39.2, 37.9, 38.3, 39.5, 39.4, 38.5, 39.1, 38.4, 39.1 Fél órával a gyógyszer beadása után: 37.3, 36.9, 37.3, 37.2, 38.2, 37.4, 36.5, 37.3, 37.4, 36.8. Milyen nullhipotézist és ellenhipotézist kell feltennünk, hogy eldöntsük, hatásos-e a gyógyszer? Ellenőrizzük is Matlabbal a hipotézisünket!

elotte=[38.1, 39.2, 37.9, 38.3, 39.5, 39.4, 38.5, 39.1, 38.4, 39.1];
utana=[37.3, 36.9, 37.3, 37.2, 38.2, 37.4, 36.5, 37.3, 37.4, 36.8];

A nullhipotézis az, hogy a várható értékek megegyeznek, míg az ellenhipotézis az, hogy különbözőek. A hipotézisünk ellenőrzéséhez kétmintás t-próbát alkalmazunk:

ttest2(elotte, utana)
ans =

     1

Azaz 95%-os biztonsággal kijelenthetjük, hogy a gyógyszer hatásos.

Ha az az ellenhipotézisünk, hogy a hőmérséklet csökkenti a gyógyszer, akkor jobboldali próbát kell alkalmazzunk.

ttest2(elotte, utana,'Tail', 'right')
ans =

     1