こういうリサイクル方法もある. sample.a <- c("A","A","A","B","B","B","B","B") c("red","blue")[as.integer(as.factor(sample.a))] A を赤に,B を緑にプロットできる 実行例として[[R_SupportVectorMachines]]を参照.