Apa perbedaan antara operator penugasan “=” dan “<-” dalam R?

Apa perbedaan antara operator penugasan =dan <-dalam R?

Saya tahu bahwa operator sedikit berbeda, seperti yang ditunjukkan contoh ini

x <- y <- 5
x = y = 5
x = y <- 5
x <- y = 5
# Error in (x <- y) = 5 : could not find function "<-<-"

Tetapi apakah ini satu-satunya perbedaan?

Apa perbedaan antara operator penugasan =dan <-dalam R?

Seperti yang ditunjukkan contoh Anda, =dan <-memiliki prioritas operator yang sedikit berbeda (yang menentukan urutan evaluasi ketika mereka dicampur dalam ekspresi yang sama). Bahkan, ?Syntaxdalam R memberikan tabel prioritas operator berikut, dari tertinggi ke terendah:

…
‘-> ->>’           rightwards assignment
‘<- <<-’           assignment (right to left)
‘=’                assignment (right to left)
…

Tetapi apakah ini satu-satunya perbedaan?

Karena Anda bertanya tentang operator penugasan : ya, itulah satu-satunya perbedaan. Namun, Anda akan dimaafkan karena percaya sebaliknya. Bahkan dokumentasi R dari ?assignOpsklaim bahwa ada lebih banyak perbedaan:

Operator <-dapat digunakan di mana saja, sedangkan operator =hanya diperbolehkan di tingkat atas (misalnya, dalam ekspresi lengkap yang diketik di command prompt) atau sebagai salah satu subekspresi dalam daftar ekspresi yang diperkuat.

Jangan terlalu menekankan hal itu: dokumentasi R (secara halus) salah ^{[ 1 ]} . Ini mudah ditunjukkan: kita hanya perlu menemukan contoh tandingan dari =operator yang tidak (a) di tingkat atas, atau (b) subekspresi dalam daftar ekspresi yang diperkuat (yaitu {…; …}). - Tanpa basa-basi:

x
# Error: object 'x' not found
sum((x = 1), 2)
# [1] 3
x
# [1] 1

Jelas kami telah melakukan tugas, menggunakan =, di luar konteks (a) dan (b). Jadi, mengapa dokumentasi fitur bahasa R inti salah selama beberapa dekade?

Itu karena dalam sintaks R simbol =memiliki dua makna berbeda yang secara rutin digabungkan:

1. Arti pertama adalah sebagai operator penugasan . Ini semua yang kita bicarakan sejauh ini.
2. Arti kedua bukanlah operator melainkan token sintaksis yang memberi sinyal argumen bernama lewat dalam panggilan fungsi. Tidak seperti =operator yang tidak melakukan tindakan saat runtime, itu hanya mengubah cara ekspresi diurai.

Ayo lihat.

Dalam bentuk kode apa pun dari bentuk umum ...

‹function_name›(‹argname› = ‹value›, …)
‹function_name›(‹args›, ‹argname› = ‹value›, …)

… The =adalah token yang mendefinisikan lewat argumen: itu bukan operator penugasan. Lebih jauh lagi, =sepenuhnya dilarang dalam beberapa konteks sintaksis:

if (‹var› = ‹value›) …
while (‹var› = ‹value›) …
for (‹var› = ‹value› in ‹value2›) …
for (‹var1› in ‹var2› = ‹value›) …

Semua ini akan menimbulkan kesalahan “tak terduga '=' di ‹bla›”.

Dalam konteks lain, =merujuk pada panggilan operator penugasan. Secara khusus, hanya menempatkan tanda kurung di sekitar subekspresi membuat salah satu dari yang di atas (a) valid, dan (b) tugas . Misalnya, berikut ini melakukan tugas:

median((x = 1 : 10))

Tetapi juga:

if (! (nf = length(from))) return()

_{Sekarang Anda mungkin keberatan bahwa kode seperti itu mengerikan (dan Anda mungkin benar). Tapi saya mengambil kode ini dari base::file.copyfungsi (ganti <-dengan =) - ini adalah pola meresap di banyak basis kode R inti.}

The penjelasan asli oleh John Chambers , yang dokumentasi R yang mungkin didasarkan pada, sebenarnya menjelaskan ini dengan benar:

[ =penugasan] diizinkan hanya di dua tempat dalam tata bahasa: di tingkat atas (sebagai program lengkap atau ungkapan yang diketik pengguna); dan ketika terisolasi dari struktur logis sekitarnya, dengan kawat gigi atau sepasang kurung tambahan.

Sebuah pengakuan: Saya berbohong sebelumnya. Ada adalah satu perbedaan tambahan antara =dan <-operator: mereka memanggil fungsi-fungsi yang berbeda. Secara default fungsi-fungsi ini melakukan hal yang sama tetapi Anda dapat menimpa keduanya secara terpisah untuk mengubah perilaku. Sebaliknya, <-dan ->(tugas dari kiri ke kanan), meskipun secara sintaksis berbeda, selalu memanggil fungsi yang sama . Mengesampingkan satu juga mengesampingkan yang lain. Mengetahui hal ini jarang praktis tetapi dapat digunakan untuk beberapa shenanigans yang menyenangkan .

Perbedaan dalam operator penugasan lebih jelas ketika Anda menggunakannya untuk menetapkan nilai argumen dalam panggilan fungsi. Sebagai contoh:

median(x = 1:10)
x   
## Error: object 'x' not found

Dalam hal ini, xdinyatakan dalam lingkup fungsi, sehingga tidak ada di ruang kerja pengguna.

median(x <- 1:10)
x    
## [1]  1  2  3  4  5  6  7  8  9 10

Dalam hal ini, xdideklarasikan di ruang kerja pengguna, sehingga Anda dapat menggunakannya setelah pemanggilan fungsi selesai.

Ada preferensi umum di antara komunitas R untuk menggunakan <-untuk penugasan (selain dari pada tanda tangan fungsi) untuk kompatibilitas dengan (sangat) versi lama S-Plus. Perhatikan bahwa spasi membantu menjelaskan situasi seperti

x<-3
# Does this mean assignment?
x <- 3
# Or less than?
x < -3

Sebagian besar R IDE memiliki pintasan keyboard untuk <-memudahkan mengetik. Ctrl+ =di Arsitek, Alt+ -di RStudio ( Option+ di -bawah macOS), Shift+ -(garis bawah) di emacs + ESS.

Jika Anda lebih suka menulis =untuk <-namun ingin menggunakan simbol tugas yang lebih umum untuk kode dirilis ke publik (di CRAN, misalnya), maka Anda dapat menggunakan salah satu tidy_*fungsi dalam formatRpaket secara otomatis mengganti =dengan <-.

library(formatR)
tidy_source(text = "x=1:5", arrow = TRUE)
## x <- 1:5

Jawaban untuk pertanyaan "Mengapa x <- y = 5melempar kesalahan tetapi tidak x <- y <- 5?" adalah "Ini ke sihir yang terkandung dalam parser". Sintaks R berisi banyak kasus ambigu yang harus diselesaikan dengan satu atau lain cara. Parser memilih untuk menyelesaikan bit ekspresi dalam urutan berbeda tergantung pada apakah =atau <-tidak digunakan.

Untuk memahami apa yang terjadi, Anda perlu tahu bahwa tugas secara diam-diam mengembalikan nilai yang ditugaskan. Anda dapat melihatnya lebih jelas dengan mencetak secara eksplisit, misalnya print(x <- 2 + 3).

Kedua, lebih jelas jika kita menggunakan notasi awalan untuk penugasan. Begitu

x <- 5
`<-`(x, 5)  #same thing

y = 5
`=`(y, 5)   #also the same thing

Parser mengartikan x <- y <- 5sebagai

`<-`(x, `<-`(y, 5))

Kita mungkin berharap itu x <- y = 5akan terjadi

`<-`(x, `=`(y, 5))

tetapi sebenarnya itu akan ditafsirkan sebagai

`=`(`<-`(x, y), 5)

Ini karena =lebih diutamakan daripada <-, seperti yang ditunjukkan pada ?Syntaxhalaman bantuan.

Panduan gaya R Google menyederhanakan masalah dengan melarang "=" untuk penugasan. Bukan pilihan yang buruk.

https://google.github.io/styleguide/Rguide.xml

Manual R menjelaskan secara rinci semua 5 operator penugasan.

http://stat.ethz.ch/R-manual/R-patched/library/base/html/assignOps.html

x = y = 5setara dengan x = (y = 5), karena operator penugasan "grup" kanan ke kiri, yang berfungsi. Artinya: menugaskan 5 ke y, meninggalkan nomor 5; dan kemudian menetapkan bahwa 5 untuk x.

Ini tidak sama dengan (x = y) = 5, yang tidak berfungsi! Artinya: tetapkan nilai yuntuk x, meninggalkan nilai y; dan kemudian menetapkan 5 untuk, umm ..., apa sebenarnya?

Saat Anda mencampur berbagai jenis operator penugasan, <-ikat lebih ketat dari =. Jadi x = y <- 5diartikan sebagai x = (y <- 5), yang merupakan kasus yang masuk akal.

Sayangnya, x <- y = 5ditafsirkan sebagai (x <- y) = 5, yang merupakan kasus yang tidak berhasil!

Lihat ?Syntaxdan ?assignOpsuntuk aturan prioritas (mengikat) dan pengelompokan.

Menurut John Chambers, operator =hanya diperbolehkan di "tingkat atas," yang berarti tidak diperbolehkan dalam struktur kontrol seperti if, membuat kesalahan pemrograman berikut ini ilegal.

> if(x = 0) 1 else x
Error: syntax error

Saat ia menulis, "Menolak formulir penugasan baru [=] dalam ekspresi kontrol menghindari kesalahan pemrograman (seperti contoh di atas) yang lebih mungkin dengan operator yang sama daripada dengan penugasan S lainnya."

Anda dapat melakukan ini jika "terisolasi dari struktur logis sekitarnya, dengan kawat gigi atau sepasang kurung tambahan," demikian juga if ((x = 0)) 1 else xakan berhasil.

Lihat http://developer.r-project.org/equalAssign.html

Operator <-dan =menugaskan ke lingkungan di mana mereka dievaluasi. Operator <-dapat digunakan di mana saja, sedangkan operator =hanya diperbolehkan di tingkat atas (misalnya, dalam ekspresi lengkap yang diketik di command prompt) atau sebagai salah satu subekspresi dalam daftar ekspresi yang diperkuat.

Ini juga dapat menambah pemahaman tentang perbedaan antara kedua operator:

df <- data.frame(
      a = rnorm(10),
      b <- rnorm(10)
)

Untuk elemen pertama R telah menetapkan nilai dan nama yang tepat, sedangkan nama elemen kedua terlihat agak aneh.

str(df)
# 'data.frame': 10 obs. of  2 variables:
#  $ a             : num  0.6393 1.125 -1.2514 0.0729 -1.3292 ...
#  $ b....rnorm.10.: num  0.2485 0.0391 -1.6532 -0.3366 1.1951 ...

R versi 3.3.2 (2016-10-31); macOS Sierra 10.12.1