Running examples in ‘l1spectral-Ex.R’ failed
The error most likely occurred in:

> ### Name: l1_spectralclustering
> ### Title: Run the l1-spectral clustering algorithm
> ### Aliases: l1_spectralclustering
> 
> ### ** Examples
> 
>  #####################################################
>  # Performing the l1-spectral clustering on the graph
>  #####################################################
> 
>  data(ToyData)
> 
>  # unstabilized version (for stabilized version, turn stab to TRUE)
> 
>  # when desired, the number of clusters and representative elements can be provided
>  results2 <- l1_spectralclustering(A = ToyData$A_hat, pen = "thresholdedLS",
+              k=2, elements = c(1,4))
[1] "The graph has only one connected component."
[1] "The provided number of clusters is 2."
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
[1] "Iteration 1 done."
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
[1] "Iteration 2 done."
[1] "Find other community indices."
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
Warning in sol2[which(sol2 > 0)] <- solution :
  number of items to replace is not a multiple of replacement length
[1] "Iteration 1 done."
Error in x[, ii] : subscript out of bounds
Calls: l1_spectralclustering ... model.frame.default -> na.omit -> na.omit.data.frame
Execution halted