r - 相関円プロットの変数への形状の割り当て

Question

ラベルの代わりにプロットの列名に異なる形状を設定できるかどうかを知りたいです。プロットを取得するための再現可能な例を示しました。

#dataset
mtcars

#split the data into different blocks
a<-mtcars[,1:3]
b<-mtcars[,4:6]
c<-mtcars[,7:9]
d<-mtcars[,10:11]

### create a list of dataframes
A<-list(blockA=a, blockB=b,blockC=c,blockD=d)

### design matrix
C <- matrix(c(0, 0, 0, 0,  
              0, 0, 0, 0, 
              0, 0, 0, 0, 
              1, 1, 1, 1), 4, 4)
tau = c(1, 1, 1, 1)
library(mixOmics)

##### computing the sGCCA
wrap.result.sgcca = wrapper.sgcca(data = A, design = C, penalty = rep(1, length(A)),
  ncomp = c(2, 2, 2,2), scheme = "centroid", verbose = FALSE)

##### visualization
col <- rep(c("blue", "red", "darkgreen", "darkviolet"))

plotVar(wrap.result.sgcca, col=col, comp = c(1,2), 
  block = c(1,2,3,4), ncomp.select = c(1,2), labels = TRUE)

このプロットでは、ブロックを独自の色で着色することができました。また、形状を使用して列を表現したいと思います。たとえば、データセット mtcars のさまざまな列名を考慮すると、

colnames(mtcars)
[1] "mpg"  "cyl"  "disp" "hp"   "drat" "wt"   "qsec" "vs"   "am"   "gear" "carb"

私が分割したブロックによると、a(columns1:3)、b(columns(4:6)、c(columns 7:9)、d(columns 10:11)、列1、4、7、10が必要です同じ形状 (円など)、列 2,5,8,11 (正方形など)、列 3,6,9 (星など) pch 値を設定しようとしましたが、列名に従って形状を生成できませんでしたこのプロット.誰かが私をここで助けてくれませんか?ありがとう