# \donttest{
data("Lsun3D")
Data=Lsun3D$Data
Cls=Lsun3D$Cls
InputDistances=as.matrix(dist(Data))
#If not called separately setGridSize() is called in Pswarm
LC=setGridSize(InputDistances)
res=Pswarm(InputDistances,LC=LC,Cls=Cls,PlotIt=TRUE)
# }
# \dontshow{
data=matrix(runif(n = 50),10,5)
distance=as.matrix(dist(data))
res1=Pswarm(DataOrDistance = distance, Parallel = FALSE, LC = c(10,12))
res2=Pswarm(DataOrDistance = distance, Parallel = TRUE, LC = c(10,12))
# }
Run the code above in your browser using DataLab