Браузеры были снисходительны к этому (много лет назад, когда css был молод) и позволяют использовать ID более одного раза.
Однако идентификаторы yes должны быть уникальными и использоваться только один раз.
Если вам нужно использовать css-форматирование более одного раза, используйте CLASS.
Вам не нужно хранить подмножества индивидуально. Все это может быть обработано в цикле while
:
myData <- matrix(data = NA,10,3)
while(sum(is.na(myData))>0){ ## while there are NAs
if (sum(is.na(myData)[,1])>1){ ## if it is not the last row (because the last row will need differetn approach being a vector, and not a matrix)
myData[is.na(myData)[,1],][ ## from the subset of NAs whose first column (and hence all of it) is not NA
sample(1:nrow(myData[ ## choose one randomly
is.na(myData)[,1],] ),size = 1),] = sample(1:100,size = 3,replace = TRUE) ## substitute it by a random vector of the same length
} else { ## for the last one
myData[is.na(myData)[,1],]= sample(1:100,size = 3,replace = TRUE)
}
}