# Create an initial condition HRU table where SOIL[0] is 0.5mm for all HRUs
# Check.names is set to FALSE to allow for brackets in the column name
initHRU <- data.frame('HRU'=1:10, 'SOIL[0]'=0.5, check.names=FALSE)
model_start = as.Date('2001-10-01')
# Generate RVC file
rvn_rvc_write(filename = file.path(tempdir(), "New.rvc"),
initHRU = initHRU,
init_date = model_start,
author = 'Harry Potter')
Run the code above in your browser using DataLab