Update Random permuted block.R