[R-br] Mudanca da classe de dados e modificacao de valor desses

[Leonardo Monteiro]

Prezados, segue o codigo para o exemplo:


setwd('C:/Users/Leonardo/Desktop/')


##Baixando os dados da internet
setInternet2(FALSE) #desativa
setInternet2(NA) #mostra o status

base<- '
http://power.larc.nasa.gov/cgi-bin/cgiwrap/solar/agro.cgi?email=agroclim%40larc.nasa.gov&step=1&lat=
'

url<- paste0(base,sep=-22.7, '&lon=', sep = -48, '&ms=1&ds=1&ys=', sep =
1983, '&me=12&de=31&ye=', sep = 1986,
'&p=toa_dwn&p=swv_dwn&p=lwv_dwn&p=T2M&p=T2MN&p=T2MX&p=RH2M&p=DFP2M&p=RAIN&p=WS10M&submit=Submit')

download.file(url, 'teste.txt', method = "auto", quiet = FALSE, mode = "w",
cacheOK = TRUE)

##
dados<- read.table('teste.txt', sep= '', dec = '.', skip=24); head(dados)

dados<- dados[,-c(3,5, 10)]; head(dados)

colnames(dados)<- c('ano', 'dj', 'Qg', 'tmed', 'tmin', 'tmax', 'ur',
'chuva', 'u10'); head(dados)

dados[180:190,] # dados onde comeca a haver dados de Qg (os dados estao
corretos)

dados$Qg[dados$Qg == '-']<- NA; dados[180:190,]  ##apresentando os dados de
Qg ja com NA

class(dados$Qg) # dados como factor

dados$Qg<- as.numeric(dados$Qg); class(dados$Qg)   ##Ok, eles estao como
'numeric'

dados[180:190,] #na transformacao, os valores de Qg mudaram

#####


Alguem poderia me ajudar a inserir os valores NA onde estao apresentados
'-', entretanto sem que modifique o valor original dos dados (os que nao
sao NA)??


obrigado,

Leonardo
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20140912/e00fe452/attachment.html>