Advertisement
Guest User

Untitled

a guest
Nov 30th, 2017
120
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.65 KB | None | 0 0
  1. library(RMySQL)
  2.  
  3. myDB = dbConnect(MySQL(), user = 'root', password = '', dbname = 'rdatabase', host = 'localhost')
  4.  
  5. # List the tables available in this database.
  6. dbListTables(myDB)
  7.  
  8.  
  9. #Read data from MySQL
  10. try1 = fetch(dbSendQuery(myDB, "SELECT * FROM usermaster;"))
  11. try1
  12.  
  13.  
  14. try1$username
  15.  
  16. #Insert Data to Table usermaster
  17. dbSendQuery(myDB, "INSERT INTO usermaster(username, password, userid) values('Tt51','t111','123')")
  18.  
  19.  
  20.  
  21.  
  22. stu = fetch(dbSendQuery(myDB, "SELECT * FROM students;"))
  23. stu
  24.  
  25. courses = fetch(dbSendQuery(myDB, "SELECT * FROM course;"))
  26. courses
  27.  
  28. (m1 <- merge(stu, courses, by.x = "id", by.y = "cid"))
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement