x <- "data_norm_20110103T093015.txt"
# change the time to 30 seconds past 2:45 p.m.
print(set_ftime(x, "144530"))
# to change the date, time must be specified as well
print(set_ftime(x, "20110505T101500"))
Run the code above in your browser using DataLab