Hi, I am reading a mongoDB document and fetching some keys of a document and want to return that as output. But it is not coming in a desired format.
My Mongo document:
{
"_id" : ObjectId("5e8ac613349951694201d663"),
"StartTime" : ISODate("2020-04-06T06:02:58.537Z"),
"TrainingProcess" : "completed",
"EndTime" : "2020-04-06 11:34:40",
"TrainingStatus" : "completed",
"Progress" : "100%"
}
My plumber.R request:
#'@get /get_status
function(){
status <- training_status$find(query = '{"TrainingStatus":"running"}')
output <- list(status['TrainingStatus'], status['Progress'])
return(output)
}
My output:
[
[
{
"TrainingStatus": "completed"
}
],
[
{
"Progress": "100%"
}
]
]
I need something like this:
{
"TrainingStatus" : "completed",
"Progress" : "100%"
}
I also tried output <- jsonlite::toJSON(output, pretty = TRUE, auto_unbox = TRUE)
but it didn't work
How to get the output in the desired format?