Cara Mengurangkan Bilangan Talian di R - dummies

Apabila mengubah skrip di R, tidak semua unsur diperlukan. Kenyataannya, penyataan () adalah pilihan, kerana, secara lalai, R akan selalu mengembalikan nilai baris terakhir kod dalam badan fungsi.

Nilai pulangan secara lalai

Anggap anda terlupa untuk menambahkan kembali (hasil) dalam fungsi addPercent (). Apa yang akan berlaku kemudian? Anda boleh mengetahui jika anda memadamkan baris terakhir fungsi addPercent (), simpan fail itu, dan sumberkannya lagi untuk memuatkannya ke ruang kerja.

Sebarang perubahan yang anda buat pada fungsi akan berkuat kuasa hanya selepas anda menghantar kod yang disesuaikan kepada konsol. Ini akan menggantikan fungsi fungsi lama dengan yang baru.

Jika anda cuba addPercent (nombor baru) lagi, anda melihat … apa-apa. Ternyata, fungsi itu tidak lagi dilakukan - tetapi ini adalah ilusi, seperti yang anda dapat lihat dengan kod berikut: >> print (addPercent (angka baru)) [1] "82. 2%" "2 Dalam hal ini, baris terakhir fungsi mengembalikan nilai hasil

tidak kelihatan,

itulah sebabnya anda melihatnya hanya jika anda secara khusus meminta cetaknya. Nilai dikembalikan tidak dapat dilihat kerana tugasan di baris terakhir. Kerana ini tidak benar-benar praktikal, anda boleh menggugurkan tugasan dalam baris terakhir dan menukar kod fungsi kepada yang berikut:

addPercent <- fungsi (x) {peratus <- bulat (x * 100, angka = 1) tampal (peratus, "%", sep = ") seperti sebelumnya, ia mungkin kelihatan seperti kembali () adalah sangat tidak berguna, tetapi anda benar-benar memerlukannya jika anda mahu keluar dari fungsi sebelum akhir kod dalam badan. Sebagai contoh, anda boleh menambah garis kepada fungsi addPercent yang memeriksa sama ada x adalah angka, dan jika tidak, mengembalikan NULL, seperti ini:

addPercent <- function (x) {if (! (x) 100, digit = 1) tampal (peratus, "%", sep = "))

Memecah dinding

membentuk dinding pepatah di sekeliling fungsi, tetapi dalam beberapa kes anda juga boleh menggugurkannya. Katakan anda ingin mengira kemungkinan dari perkadaran. Kemungkinan sesuatu yang berlaku tidak lebih daripada peluang yang berlaku dibahagikan dengan peluang itu tidak berlaku. Jadi, untuk mengira kemungkinan, anda boleh menulis fungsi seperti ini:

 >> kemungkinan <- fungsi (x) x / (1-x)

Walaupun tanpa penyokong braces atau return (), ini berfungsi dengan baik, seperti yang anda lihat dalam contoh berikut: >> kemungkinan (0,8) [1] 4

Jika fungsi terdiri daripada hanya satu baris kod, anda hanya boleh menambah baris itu selepas senarai argumen tanpa melampirkannya dalam penyokong.R akan melihat kod tersebut selepas senarai hujah sebagai badan fungsi.

Anda boleh melakukan perkara yang sama dengan fungsi addPercent () dengan menyusun semua seperti ini: >> addPercent <- fungsi (x) tampal (bulat (x * 100, digit = 1), "%", sep = ")

Itulah pelan licik untuk memberi orang yang seterusnya membaca kod kepala sakit kepala yang besar.Ia sedikit kurang pelan licik jika orang seterusnya adalah anda, dan, kemungkinannya, itu akan menjadi.

Menyimpan ruang dalam badan fungsi adalah jauh lebih penting daripada menyimpan kod yang boleh dibaca, kerana menjimatkan ruang keuntungan anda tidak. Membina seperti fungsi kemungkinan berguna hanya dalam kes yang sangat spesifik.