Šiame straipsnyje sužinosime apie taikomas(), lapply(), sapply() ir tapply() funkcijas. R programavimo kalba.
„Application()“ rinkinys yra R esminio paketo dalis. Ši funkcijų šeima padeda mums pritaikyti tam tikrą funkciją tam tikram duomenų rėmui, sąrašui ar vektoriui ir grąžinti rezultatą kaip sąrašą arba vektorių, priklausomai nuo mūsų naudojamos funkcijos. Funkcijų grupėje apply() yra šie keturi funkcijų tipai:
taikyti() funkciją
Funkcija apply () leidžia pritaikyti funkciją matricos arba duomenų rėmelio eilutėms arba stulpeliams. Ši funkcija naudoja matricą arba duomenų rėmelį kaip argumentą kartu su funkcija ir tuo, ar ji turi būti taikoma pagal eilutę ar stulpelį, ir pateikia rezultatą vektoriaus, masyvo arba gautų reikšmių sąrašo pavidalu.
Sintaksė: taikyti (x, paraštė, funkcija)
Parametrai:
x: nustato įvesties masyvą, įskaitant matricą. paraštė: jei paraštė yra 1 funkcija, taikoma visoje eilutėje, jei paraštė yra 2, ji taikoma visoje stulpelyje. funkcija: nustato funkciją, kuri turi būti taikoma įvesties duomenims.
Pavyzdys:
Čia yra pagrindinis pavyzdys, parodantis, kaip naudoti eilutes ir stulpelius.
R
# create sample data> sample_matrix <->matrix>(C<-(1:10),nrow=3, ncol=10)> > print>(>'sample matrix:'>)> sample_matrix> > # Use apply() function across row to find sum> print>(>'sum across rows:'>)> apply>( sample_matrix, 1, sum)> > # use apply() function across column to find mean> print>(>'mean across columns:'>)> apply>( sample_matrix, 2, mean)> |
>
>
Išvestis:
lapply() funkcija
Funkcija lapply() padeda mums taikyti funkcijas sąrašo objektams ir grąžina tokio pat ilgio sąrašo objektą. Funkcija lapply() R kalboje paima sąrašą, vektorių arba duomenų rėmelį kaip įvestį ir pateikia išvestį sąrašo objekto pavidalu. Kadangi funkcija lapply() taiko tam tikrą operaciją visiems sąrašo elementams, jai MARGIN nereikia.
Sintaksė: lapply (x, smagu)
Parametrai:
x: nustato įvesties vektorių arba objektą. įdomus: nustato funkciją, kuri turi būti taikoma įvesties duomenims.
Pavyzdys:
Čia yra pagrindinis pavyzdys, parodantis, kaip vektoriui naudojama funkcija lapply().
R
kokio dydžio mano monitorius
# create sample data> names <->c>(>'priyank'>,>'abhiraj'>,>'pawananjani'>,> >'sudhanshu'>,>'devraj'>)> print>(>'original data:'>)> names> > # apply lapply() function> print>(>'data after lapply():'>)> lapply>(names, toupper)> |
>
>
Išvestis:
apply() funkcija
Funkcija sapply() padeda mums taikyti funkcijas sąraše, vektoriuose arba duomenų rėmuose ir grąžina tokio pat ilgio masyvo arba matricos objektą. Funkcija sapply() R kalboje kaip įvestį paima sąrašą, vektorių arba duomenų rėmelį ir pateikia išvestį masyvo arba matricos objekto pavidalu. Kadangi funkcija sapply () taiko tam tikrą operaciją visiems objekto elementams, jai MARGIN nereikia. Tai tas pats, kas lapply(), vienintelis skirtumas yra grąžinamo objekto tipas.
Sintaksė: taikyti (x, smagu)
Parametrai:
x: nustato įvesties vektorių arba objektą. įdomus: nustato funkciją, kuri turi būti taikoma įvesties duomenims.
Pavyzdys:
Čia yra pagrindinis pavyzdys, parodantis, kaip vektoriui naudojama sapply() funkcija.
R
# create sample data> sample_data<->data.frame>( x=>c>(1,2,3,4,5,6),> >y=>c>(3,2,4,2,34,5))> print>(>'original data:'>)> sample_data> > # apply sapply() function> print>(>'data after sapply():'>)> sapply>(sample_data, max)> |
>
stovint
>
Išvestis:
tapply() funkcija
Tapply() padeda mums apskaičiuoti statistinius rodiklius (vidurkis, mediana, min, maksimalus ir kt.) arba savarankiškai įrašytą funkcijos operaciją kiekvienam veiksnio kintamajam vektoriuje. Tai padeda mums sukurti vektoriaus poaibį ir tada kiekvienam poaibiui pritaikyti kai kurias funkcijas. Pavyzdžiui, organizacijoje, jei turime duomenis apie darbuotojų atlyginimus ir norime rasti vidutinį atlyginimą vyrams ir moterims, tada galime naudoti funkciją tapply() su vyrišku ir moterišku kintamuoju lyties veiksniu.
Sintaksė: tapply (x, rodyklė, įdomus)
Parametrai:
x: nustato įvesties vektorių arba objektą. indeksas: nustato faktorių vektorių, padedantį atskirti duomenis. įdomus: nustato funkciją, kuri turi būti taikoma įvesties duomenims.
Pavyzdys:
Čia yra pagrindinis pavyzdys, parodantis, kaip naudojama tapply () funkcija deimantų duomenų rinkinyje, kurį teikia tidyverse paketų biblioteka.
R
# load library tidyverse> library>(tidyverse)> > # print head of diamonds dataset> print>(>' Head of data:'>)> head>(diamonds)> > # apply tapply function to get average price by cut> print>(>'Average price for each cut of diamond:'>)> tapply>(diamonds$price, diamonds$cut, mean)> |
>
>
Išvestis: