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.