plotrix:pie3d: ошибка в if (labelsep <minsep) {: пропущенное значение там, где требуется TRUE / FALSE

Question

Когда я вызываю pie3D, я получаю сообщение об ошибке "Ошибка в if (labelsep

Как я могу это исправить. Там нет, если еще заявление. Это кажется внутренним для pie3D.

pie3D(slices, labels=lbls,explode=0.2, main= atitle)

Любая помощь будет оценена

С уважением Ганеш

---

Обновление с кодом. Код существует при вызове pie3D с ошибкой. Ошибка не является полезной и, похоже, относится к внутренним переменным pie3D. Код работает для нескольких случаев, кроме 1.

d <- batsman$Dismissal
e <- d[ d != "-"]
lbls <- c("bowled","caught","hit wicket","lbw","not out", "retired not out", 
"run out")
 slices <- as.vector(table(e))
 slices <-  slices[slices != 0]
 pct <- round(slices/sum(slices)*100)
 lbls <- paste(lbls, pct) # add percents to labels 
 lbls <- paste(lbls,"%",sep="") # ad % to labels 
 atitle <- paste("Pie chart of dismissals for ", name)
 labelsep<-0
 minsep <- 1
 pie3D(slices, labels=lbls,explode=0.2, main= atitle)

Ошибка здесь Ошибка в if (labelsep

Обновление: небольшие данные d

  [1] bowled  lbw     run out bowled  lbw     caught  caught  caught  
     caught  caught  bowled  caught  caught 
  [14] not out caught  lbw     bowled  caught  caught  caught  not out lbw
       lbw     caught  caught  caught 

Answer 1

Как предложено @NicE выше, убедитесь, что метки и фрагменты имеют одинаковую длину. Проблема тогда уходит.

С уважением Ганеш