Não consegui rodar, aqui falta alguma coisa: matriz 1,1,8,5,5,9,8,7,5,2),,7,byrow=T) Obg Fernando, era isso mesmo, fiz apenas uma pequena modificação, em: matriz[which(apply(matriz, 1, function(x) sum(match(x, 7), na.rm = TRUE)) == 1),] Neste caso, estou selecionando os números de interesse nas linhas, porque daí, as colunas vem como consequência. Att. André ------------------------------------------------------------------------------ Em 15/09/2012 19:43, FHRB Toledo < fernandohtoledo@gmail.com > escreveu: Sim, sim... ato falho, vamos por partes: Me precipitei... agora segue código testado, um pouco mais complicado, veja se compreende a lógica: matriz 1,1,8,5,5,9,8,7,5,2),,7,byrow=T) matriz[,which(apply(matriz, 2, function(x) sum(match(x, 7), na.rm = TRUE)) == 1)] att, FH 2012/9/15 andrebvs <andrebvs@bol.com.br> Obg Fernando, mas aparece a seguinte mensagem quando executo os comandos abaixo: Erro: tipo de subscrito inválido 'list' CMR: matriz 1,1,8,5,5,9,8,7,5,2),,7,byrow=T) selecao soselecionadas código mínimo reproduzível.