[R-br] Ajudar com organização de dados horários

[Bruce Kelly]

Boa noite pessoal,
Estou com dúvida de como acrescentar a coluna horaria de algumas. Estou usando as seguintes scritp:

rm(list=ls())
#
library(lubridate)
library(tidyverse)
library(dplyr)
library(hrbrthemes)
library(GGally)
library(ggplot2)

# Dados -------------------------------------------------------------------
# Chuva
input<- read.table('Rain_1.txt', header = T, sep = ',', dec = '.',
                   na.strings = c('NAN', 'NaN', 'Inf', 'NA'))
#
                   dec = '.', na.strings = c('NAN', 'NaN', 'Inf'))
# Organizar os dados ------------------------------------------------------
# converter o TIMESTEP em data
input$TIMESTAMP<- as.Date(ymd_hms(input$TIMESTAMP))
#tentei
input$TIMESTAMP<- as.Date(input$TIMESTAMP))
#
#
#Adicionado os meses e anos nas observações
#### a saída é em um caracter converter para numerico
input$Year<-format(input$TIMESTAMP, '%Y')
input$Month<-format(input$TIMESTAMP, '%m')
input$Day<-format(input$TIMESTAMP, '%d')
input$Doy<-format(input$TIMESTAMP, '%J')
input$Hour.s<-format(input$TIMESTAMP, '%H')

Quando executo a coluna Hour.s fica zerada como mostra a figura. E preciso que essa coluna horaria com mediação a cada 30min, fique na variação de 0-23h (0.5, 1, 1.5,...23,5)
[cid:66d78bc1-f1a2-49bc-a0c7-85bb36bcd032]

estrutura do TIMESTAMP antes de ser convertido em data

[cid:b17558fa-d648-4fbd-afb0-24424c5586e8]

Obrigado pela ajuda e atenção de todo (@s)



-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20220914/8fe66420/attachment.htm>
-------------- Próxima Parte ----------
Um anexo não-texto foi limpo...
Nome: image.png
Tipo: image/png
Tamanho: 21834 bytes
Descrição: image.png
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20220914/8fe66420/attachment.png>
-------------- Próxima Parte ----------
Um anexo não-texto foi limpo...
Nome: image.png
Tipo: image/png
Tamanho: 25024 bytes
Descrição: image.png
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20220914/8fe66420/attachment-0001.png>