There may well be a more elegant solution but this gets to the goal.
library(data.table)
rw <- c("1654508112", "3", "gel", "2785", "16545081121a8d8f956cb871053a3f56b782b70a76")
DAT <- matrix(rw,ncol=5)
cl <- c("timestamp", "assess", "catheter", "service", "ref")
dimnames(DAT) <- list("",cl)
DAT <- as.data.table(DAT)
str(DAT)
Classes ‘data.table’ and 'data.frame': 1 obs. of 5 variables:
$ timestamp: chr "1654508112"
$ assess : chr "3"
$ catheter : chr "gel"
$ service : chr "2785"
$ ref : chr "16545081121a8d8f956cb871053a3f56b782b70a76"
- attr(*, ".internal.selfref")=<externalptr>