Predictability wrong output dimensions

Hi @aho

I am exploring Predictability() and it returns some warnings from Apply:

 In arrays_of_results[[component]][(1:prod(component_dims)) +  ... :
  number of items to replace is not a multiple of replacement length

I think the output from .predictability can be of different lengths in each Apply loop; therefore, Apply doesn't know how to merge it in a single array. Currently, I am exploring how to fix this. Please, let me know if you have any tips.

An example:

library(CSTools)
attractor <- ProxiesAttractor(lonlat_data$exp$data, quanti = 0.60)
predyn <- Predictability(dim = attractor$dim, theta = attractor$theta)
str(predyn)

I guess, the pred.theta$qtheta1 is a 1D array because Apply merges the results in a vector.

Cheers,

FYI @jramon @calvarez @vtorralba