R/channelInformation.R

In flrd/loadCurves: App to generate load curves

channelInformation_fun <- function(messageReference, sender, messageDateTime) {
  sprintf(
    '{"messageReference":"%s","sender":"%s","messageDateTime":"%s"}',
    messageReference, sender, messageDateTime
  )
}