<html>
<head>
<meta content="text/html; charset=utf-8" http-equiv="Content-Type">
</head>
<body bgcolor="#FFFFFF" text="#000000">
Olá<br>
<br>
segue:<br>
<br>
## vetor tipo character<br>
PROCESSO =
rep(c("5.155.855-8","5.153.696-8","5.154.220-6",NA,NA,NA,"5.155.401-1","5.155.960-6",NA,"5.157.157-7","5.157.658-4"),
1000)<br>
<br>
um pequeno ajuste<br>
<br>
## evita que transforme em factor<br>
dados = data.frame(PROCESSO, stringsAsFactors = FALSE)<br>
indice = which(is.na(dados$PROCESSO))<br>
##Agora é so usar o indice para preencher a coluna<br>
dados[indice,"PROCESSO"] <- 1:length(indice)<br>
dados<br>
<br>
Você também pode usar o poderoso data.table<br>
<br>
library(data.table)<br>
## converte para data.table<br>
dados = data.table(PROCESSO)<br>
dados[is.na(PROCESSO), PROCESSO := as.character(1: .N)]<br>
dados<br>
<br>
saudações<br>
<br>
<div class="moz-cite-prefix">Em 27/04/2016 02:00, Amikobh escreveu:<br>
</div>
<blockquote cite="mid:57204750.4080203@gmail.com" type="cite">indice<-which(<a
moz-do-not-send="true" href="http://is.na">is.na</a>(dados$PROCESSO))<br>
<br>
##Agora é so usar o indice para preencher a coluna<br>
dados[indice,"PROCESSO"]<-1:length(indice)</blockquote>
<br>
</body>
</html>