Displaying 6 results from an estimated 6 matches for "convertimos".
2020 Feb 15
2
Colocar objeto Dates dentro de un vector.
...ando un problema al intentar poner un objeto Dates en un
vector o dataframe.
Mi ejemplo
# preliminares
install.packages( lubridate ); library( lubridate )
v <- c(0, 0, 0)
original<-c(2019,308,1700, 25) # c(año, día del año, hora, temperatura)
esto sale así de un sensor de temperatura
# convertimos los datos originales en algo que entienda R
a <- years(original[1] )
d <- days(original[2]-1 ) # el -1 es un ajuste por como son los datos
originales
h <- hours( substr(original[3], 1, 2) )
fecha <- a+d+h # Conseguimos una fecha completa
fecha.b <- as.Date(fecha, origin=&qu...
2020 Feb 24
2
Colocar objeto Dates dentro de un vector.
...> install.packages( lubridate ); library( lubridate )
>> >> v <- c(0, 0, 0)
>> >> original<-c(2019,308,1700, 25) # c(año, día del año, hora,
>> temperatura)
>> >> esto sale así de un sensor de temperatura
>> >>
>> >> # convertimos los datos originales en algo que entienda R
>> >> a <- years(original[1] )
>> >> d <- days(original[2]-1 ) # el -1 es un ajuste por como son los datos
>> >> originales
>> >> h <- hours( substr(original[3], 1, 2) )
>> >> fe...
2020 Feb 17
2
Colocar objeto Dates dentro de un vector.
...rame.
>> Mi ejemplo
>> # preliminares
>> install.packages( lubridate ); library( lubridate )
>> v <- c(0, 0, 0)
>> original<-c(2019,308,1700, 25) # c(año, día del año, hora, temperatura)
>> esto sale así de un sensor de temperatura
>>
>> # convertimos los datos originales en algo que entienda R
>> a <- years(original[1] )
>> d <- days(original[2]-1 ) # el -1 es un ajuste por como son los datos
>> originales
>> h <- hours( substr(original[3], 1, 2) )
>> fecha <- a+d+h # Conseguimos una fecha compl...
2014 Jun 23
2
Resumen de R-help-es, Vol 64, Envío 33
...rectorio de trabajo
setwd("C:/Users/pedroc/Downloads")
list.files()
# Lees el fichero, ojo al separador decimal
rocdata <- read.table(file = "roc.csv",
header = T,
sep = ";",
dec = ",")
# Convertimos los FP Y TP a porcentajes entre 0 y 1
rocdata$FP <- gsub("%", "", rocdata$FP)
rocdata$FP <- gsub(",", ".", rocdata$FP)
rocdata$FP <- as.numeric(rocdata$FP)/100
rocdata$TP <- gsub("%", "", rocdata$TP)
rocdata$TP <- gsub(&qu...
2016 Oct 28
2
Encontrar la primera columna no NA
...seis = sample( c(runif(numero) , rep(NA , numero /1e3
)) , size = numero )
)
# 1) Creamos una columna con la informacion de los jugadores,
# Como es un jugador por fila, hacemos 1:nrow.
step1 <- dat %>%
mutate(player = 1:nrow(dat))
#2) Convertimos las columnas de tiempo (uno, dos, tres, ...) en dos
# columnas, mes y numero de juegos. (Ojo, asumimos que en los datos
las
# columnas estan ordenadas como en
el ejemplo, es decir uno, dos, tres y no
# tres, uno...
2016 Oct 27
4
Encontrar la primera columna no NA
Por último, utilizando la indexación lineal de matriz que propusó luisfo en su momento:
> t <- Sys.time()
> M=as.matrix(dat)
> index <- which(!is.na(M)) - 1
> meses<-colnames(M)
> M2<- data.table(columna=index %/% nrow(M) +1L, jugador=index %% nrow(M) +1L , valor=M[index+1L])
> setkey(M2,jugador,columna)
>