make a sequence of timeseries per day in r

# Step 1: Install and load necessary packages
install.packages("zoo")
library(zoo)

# Step 2: Create sample data with timestamps
timestamps <- seq(as.POSIXct("2023-01-01 00:00:00"), as.POSIXct("2023-01-10 23:59:59"), by = "15 min")
values <- rnorm(length(timestamps))

# Step 3: Convert data to zoo time series object
time_series <- zoo(values, order.by = timestamps)

# Step 4: Aggregate data by day
daily_series <- aggregate(time_series, as.Date, mean)

# Step 5: Display the resulting time series for each day
print(daily_series)