Как рисовать эллипсы на scatterplot3d

Question

У меня есть следующий фрейм данных:

 cost quality safety time    status
1   13       6      3    4 Benchmark
2   10       4      5   10 Benchmark
3    8       9      3    9 Benchmark
4    7       8      9    9 Benchmark
5    4       4      4    2   current
6    2       2      7   11   current

Я хочу создать эталонные космические интервалы рассеянного графика. Поэтому я использовал пакет scatterplot3d, чтобы нарисовать его.

Код Scatterplot:

scatterplot3d(f$cost,f$quality,f$safety,f$time,f$status)

Я получил график ниже, Но я хочу нарисовать эллипсы для тестов с уровнем достоверности 0,975. Так что я нашел dataEllips в автомобильном пакете, но я не знаю, как применить эту функцию в scatterplot3d. График, который я хочу, выглядит следующим образом:

Я пробовал код ниже, но он не работает;

scatterplot3d(dataEllipse(f$cost,f$quality,levels=0.68),f$safety,f$time,f$status)

потому что функция dataEllips исходит из пакета автомобиля. Сообщение об ошибке выглядит следующим образом:

Error in xyz.coords(x = x, y = y, z = z, xlab = xlabel, ylab = ylabel,  : 
  'x', 'y' and 'z' lengths differ