Hi friends,
I was trying to read a MySQL table and then converting to data.frame to
JSON format. Following is the code
library(RJSONIO);
con <- dbConnect("MySQL", host="localhost", user
="root", dbname = "myDB")
rs1 <- dbGetQuery(con, "select * from strawhats;")
print(rs1)
json_rs <- toJSON(rs1);
print(json_rs)
But I get columns of the data.frame info in vector form as shown following.
> source("data.R")
id name position ambition
1 1 Monkey D Luffy Captain I Will become the pirate king
2 2 Roronoa zoro Swordman Become greatet swordman
3 3 Sanji Cook Find all blue
4 4 Nami Navigator Draw map of the world
5 5 Usopp Sniper Become greatest warrior
[1] "{\n \"id\": [ 1, 2, 3, 4, 5 ],\n\"name\": [
\"Monkey D Luffy\",
\"Roronoa zoro\", \"Sanji\", \"Nami\",
\"Usopp\" ],\n\"position\": [
\"Captain\", \"Swordman\", \"Cook\",
\"Navigator\", \"Sniper\"
],\n\"ambition\": [ \"I Will become the pirate king\",
\"Become greatet
swordman\", \"Find all blue\", \"Draw map of the
world\", \"Become greatest
warrior\" ] \n}"
Is there any easy way to get data.frame information in row form. I mean, in
the following format
{ { id : 1, name: "Monkey D Luffy", position: "captain",
ambition: "I will
become the pirate king" } , {id: 2, name:"Roronoa zoro",
position:
"swordman", ambition:"become greate swordman" } , { } , { },
{ } }
Please let me know if there is any way to do this.
Regards,
MLSC
[[alternative HTML version deleted]]