tf <- file.path(tempdir(), 'HogwartsBasin.rvp')
rvn_write_Raven_header(filename = tf,
filetype = 'rvp ASCII Raven 2.9.1',
author = 'Harry Potter')
# view file
readLines(tf)
Run the code above in your browser using DataLab