将时间序列从每15分钟扩展到R中的10秒

I have the following data set, abbreviated for simplicity:
SM = soil moisture, T = Temperature

DateTime              SMCount      T1        T2      T3  
2023-04-24 11:45:00   3960        12.875   15.625   17.5  
2023-04-24 12:00:00   3951        13.00    15.375   17.125         
2023-04-24 12:15:00   3955        13.25    15.6875  17.5  
2023-04-24 12:30:00   3961        13.1875  14.75    15.875 

等.

我想创建以下内容:

DateTime              SMCount      T1        T2      T3  
2023-04-24 11:45:00   3960        12.875   15.625   17.5  
2023-04-24 11:45:10   3960        12.875   15.625   17.5  
2023-04-24 11:45:20   3960        12.875   15.625   17.5  
2023-04-24 11:45:30   3960        12.875   15.625   17.5 

...诸若此类

2023-04-24 12:00:00   3951        13.00    15.375   17.125   
2023-04-24 12:00:10   3951        13.00    15.375   17.125   
2023-04-24 12:00:20   3951        13.00    15.375   17.125   
2023-04-24 12:00:30   3951        13.00    15.375   17.125   

...诸若此类

2023-04-24 12:15:00   3955        13.25    15.6875  17.5   
2023-04-24 12:15:10   3955        13.25    15.6875  17.5   
2023-04-24 12:15:20   3955        13.25    15.6875  17.5   
2023-04-24 12:15:30   3955        13.25    15.6875  17.5  

...诸若此类

2023-04-24 12:30:00   3961        13.1875  14.75    15.875   
2023-04-24 12:30:10   3961        13.1875  14.75    15.875   
2023-04-24 12:30:20   3961        13.1875  14.75    15.875   
2023-04-24 12:30:30   3961        13.1875  14.75    15.875   

...诸若此类

我搜索了这个问题，发现了我正在try 适应的两个可能的解决方案:

解决方案1:

library(tidyr)
df <- complete(soilmoisture$DateTime = seq(from = min(soilmoisture$DateTime), to = max(soilmoisture$DateTime), by = 1)) %>%
  fill(SMCount)

解决方案2:

library(tidyverse)
data <- mutate(soilmoisture$DateTime = lubridate::ymd_hms(soilmoisture$DateTime))%>%
  complete(soilmoisture$DateTime = seq.POSIXt(min(soilmoisture$Datetime), max(soilmoisture$DateTime), by="sec"))%>%
  fill(SMCount)

我分别收到以下错误消息:

Error: unexpected '=' in "df %>% complete(soilmoisture$DateTime="  
and  
Error: unexpected '=' in "data <- mutate(soilmoisture$DateTime ="

你知道怎么修吗？ 我如何调整我的代码，使SMCount、t1、t2和t3同时填充？

非常感谢