Necesito crear un diagrama de caja de un data.frame contres columnas numéricas, y usar el argumentodivisión para separar las cajas porpintar. Tengo un data.frame grande, pero lo que necesito está en el siguiente ejemplo:

paint<-c("blue", "black", "red", "blue", "black", "red", "blue", "black", "red")
car1<-c(100, 138, 123, 143, 112, 144, 343, 112, 334)
car2<-c(111, 238, 323, 541, 328, 363, 411, 238, 313)
car3<-c(432, 123, 322, 342, 323, 522, 334, 311, 452)
data<-data.frame(paint, car1, car2, car3)

>data
      paint  car1 car2 car3
   1  blue   100  111  432
   2  black  138  238  123
   3  red    123  323  322
   4  blue   143  541  342
   5  black  112  328  323
   6  red    144  363  522
   7  blue   343  411  334
   8  black  112  238  311
   9  red    334  313  452

Cuando usé solo una columna, la siguiente función funciona:

diagrama de caja (división (datos [, 2], datos [, 1]))

Pero cuando intento crear un boxplot usandotres columnas La función no funciona:

diagrama de caja (división (datos [, 2: 4], datos [, 1]))

Gracias por la ayuda y perdón por el mal inglés.