Contoh () Fungsi di R

Contoh Fungsi Di R



Di R, kami mendapatkan nilai sampel acak dari vektor atau daftar menggunakan fungsi sample() . Ini memungkinkan kita untuk secara acak memilih subset data yang berguna dalam banyak aplikasi statistik. Jika inputnya adalah daftar dalam fungsi sample() , outputnya juga akan berupa daftar dengan jumlah elemen yang sama, tetapi dengan elemen yang dipilih. Artikel ini mendemonstrasikan fungsi sample() dari R dengan implementasi yang menetapkan berbagai argumen.

Contoh 1: Menggunakan Fungsi Sample() dengan Argumen Data

Fungsi sample() dari R harus dilengkapi dengan data sampel untuk menghasilkan angka secara acak. Data sampel adalah argumen yang diperlukan dari fungsi sample() yang kodenya diberikan sebagai berikut:

dataX < - C ( 10 , dua puluh , 30 , 40 , lima puluh , 60 , 70 , 80 , 90 , 100 )

Sampel ( dataX , 3 )

Sampel ( dataX , 3 )

Di sini, pertama-tama kita membuat vektor elemen bilangan bulat di dalam variabel 'dataX'. Selanjutnya, kita memanggil fungsi sample() dua kali dalam kode dan meneruskan vektor 'dataX' yang sebelumnya kita hasilkan sebagai argumen. Penggunaan sampel pertama (dataX, 3) mengambil sampel acak dari tiga elemen dari vektor 'dataX'. Hasilnya adalah permutasi acak dari tiga elemen dari “dataX”. Setelah itu, kami menggunakan sampel (a, 5) lagi yang mengambil sampel acak independen lainnya dari tiga elemen dari vektor 'dataX'. Kali ini, hasilnya sama sekali berbeda dari yang terakhir.







Output menunjukkan elemen yang berbeda saat memanggil fungsi sample() dua kali. Perhatikan bahwa setiap kali kita membuat sampel secara acak, elemen yang berbeda dari vektor diperoleh:





Contoh 2: Menggunakan Fungsi Sample() dengan Argumen Ganti

Selain itu, kami memiliki argumen 'ganti' dari fungsi sample() yang mengambil nilai logika. Elemen serupa dapat dipilih lebih dari satu kali jika elemen diambil sampelnya dengan opsi penggantian, BENAR. Namun, jika nilainya disetel ke FALSE, hanya ada satu pilihan dari setiap elemen yang menyebabkan elemen diambil sampelnya tanpa penggantian.





angka_acak = C ( sebelas , 25 , 12 , 89 , Empat.Lima , 16 , 67 , 38 , 96 , 55 , 73 )

Sampel ( angka_acak , 4 , mengganti = BENAR )

Sampel ( angka_acak , 5 , mengganti = BENAR )

Di sini, pertama-tama kita mendefinisikan vektor dengan beberapa nilai numerik dalam variabel “angka_acak”. Setelah itu, kami memanggil fungsi sample() di mana 'random_numbers' diteruskan sebagai argumen. Nilai '4' ditentukan ke fungsi sample() yang menunjukkan bahwa ia hanya memilih empat nilai acak dari vektor dalam 'angka_acak'.

Selanjutnya, replace=TRUE dalam fungsi sample() menentukan bahwa setiap nilai dapat dipilih lebih dari satu kali. Kemudian, kami menggunakan fungsi sample() lagi yang memilih nilai acak '5' dari vektor kali ini. Demikian pula, kami menyetel argumen ganti dengan 'BENAR' seperti sebelumnya untuk beberapa pilihan pilihan untuk setiap nilai.



Seperti yang bisa kita lihat, keluaran pertama menampilkan vektor dari 4 elemen yang dipilih secara acak dari vektor “bilangan_acak”. Output berikutnya, bagaimanapun, menampilkan vektor '5' elemen yang dipilih secara acak:

Contoh 3: Menggunakan Fungsi Sample() dengan Argumen Ukuran

Argumen selanjutnya yang diteruskan oleh fungsi sample() adalah 'size'. 'Ukuran' adalah parameter opsional yang menunjukkan nilai sampel yang akan diambil. Kode fungsi sample() dengan parameter “size” diberikan sebagai berikut:

vektor < - 1 : 10

Sampel ( vektor , ukuran = 5 )

Di sini, vektor numerik didefinisikan sebagai urutan bilangan bulat dari 1 hingga 10 dalam variabel 'vektor'. Fungsi sample() kemudian digunakan untuk pemilihan elemen acak dari vektor. Seperti yang bisa kita lihat, fungsi sample() mengambil dua argumen. Argumen pertama adalah vektor dari mana kita mendapatkan sampel. Argumen selanjutnya adalah ukuran yang ditentukan dengan nilai “5” yang menunjukkan bahwa hanya ada lima elemen untuk dipilih dari vektor.

Oleh karena itu, elemen yang dipilih dikembalikan dalam urutan acak sebagai vektor baru dalam keluaran berikut:

Contoh 4: Menggunakan Fungsi Sample() untuk Daftar R

Selain itu, fungsi sample() dapat digunakan untuk daftar di R. Bagian contoh ini mendapatkan nilai acak dari daftar.

R_list < - daftar ( 1 : 4 ,

913 ,

C ( 'X' , 'YYY' , 'BAGUS' ) ,

'ZZZ' ,

5 )

hasil < - R_list [ Sampel ( 1 :panjang ( R_list ) , ukuran = 4 ) ]

hasil

Di sini, daftar 'R_list' didefinisikan dengan elemen dari tipe yang berbeda termasuk vektor numerik, angka tunggal, vektor karakter, string, dan angka lainnya. Setelah itu, kami membuat variabel 'hasil' di mana fungsi sample() dipanggil.

Di dalam fungsi sample(), kita menyetel ekspresi “1:length(R_list)” yang menunjukkan vektor indeks untuk dijadikan sampel. Selanjutnya, kami memiliki argumen 'ukuran' untuk menentukan jumlah elemen yang akan dijadikan sampel yaitu '4'. Oleh karena itu, 'R_list' menghasilkan tiga elemen yang dipilih secara acak dari daftar 'R_list'. Karena elemen dalam daftar 'R_list' memiliki tipe yang berbeda, elemen yang dihasilkan dalam 'hasil' juga dapat memiliki tipe yang berbeda.

Outputnya mewakili daftar baru yang berisi subset acak dari daftar asli:

Contoh 5: Menggunakan Fungsi Sample() dengan Prob Argument

Selain itu, kami memiliki parameter 'prob' dari fungsi sample(). Argumen 'prob' memberikan probabilitas elemen yang dipilih dalam vektor. Perhatikan bahwa semua elemen diasumsikan memiliki probabilitas yang sama ketika argumen “prob” tidak digunakan.

data saya = C ( 31 , 99 , 5 , 24 , 72 )

Sampel ( data saya , ukuran = 10 , mengganti = BENAR ,

masalah = C ( 0,5 , reputasi ( 0,1 , 4 ) ) )

Di sini, elemen vektor numerik dirujuk ke 'my_data'. Pada langkah selanjutnya, kita memanggil fungsi sample() di mana 'my_data' diteruskan ke 10 elemen yang dipilih secara acak darinya. Kemudian, argumen 'ukuran' ditentukan yang menentukan bahwa nilai yang akan dipilih secara acak harus berukuran '10'. Setelah itu, kami menetapkan 'BENAR' ke argumen 'ganti' yang berarti bahwa setiap elemen yang dipilih diganti menjadi vektor sebelum memilih yang berikutnya. Argumen ketiga yang didefinisikan dalam fungsi sample() adalah 'prob' yang mendefinisikan probabilitas setiap elemen dalam vektor 'my_data' untuk dipilih. Probabilitas elemen pertama diatur ke '0,5'. Untuk empat elemen vektor yang tersisa, probabilitasnya adalah “0,1”.

Keluaran berikut diambil dengan probabilitas tertinggi dari elemen pertama dalam vektor seperti yang diharapkan:

Contoh 6: Menggunakan Fungsi Sample() untuk Merender Barplot

Terakhir, fungsi sample() digunakan untuk membangun barplot di R untuk memvisualisasikan distribusi variabel kategori dengan distribusi probabilitas yang diberikan.

contoh data = C ( 1 , 2 , 3 )

barplot ( meja ( Sampel ( contoh data , ukuran = 500 , mengganti = BENAR , masalah = C ( .30 , .60 , .10 ) ) ) )

Di sini, setelah mendefinisikan 'sample_data' dengan vektor nilai integer, kami membuat barplot dengan menggunakan fungsi sample(). Pertama, kita memanggil barplot yang memanggil fungsi table() untuk membuat tabel frekuensi dari sampel yang dihasilkan. Kemudian, kita menentukan fungsi sample() di dalam fungsi table() di mana sampel acak berukuran 1000 diambil dari vektor bilangan bulat 1 sampai 3. Kemudian, argumen 'prob' digunakan untuk menentukan probabilitas pemilihan setiap bilangan bulat .

Seperti yang dapat kita lihat sekarang, petak batang dirender sebagai berikut dengan tiga batang, satu untuk setiap bilangan bulat, dan tinggi batang relevan dengan bilangan bulat yang muncul dalam sampel:

Kesimpulan

Kita telah melihat bagaimana fungsi sample() bekerja dengan berbagai contoh. Fungsi sample() digunakan dengan argumen yang berbeda di mana data sampel diperlukan dan semua argumen lainnya bersifat opsional dan dipanggil berdasarkan kasus tertentu. Namun, fungsi sample() berguna dalam analisis statistik atau saat bekerja dengan kumpulan data besar.