Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- library(RMySQL)
- myDB = dbConnect(MySQL(), user = 'root', password = '', dbname = 'rdatabase', host = 'localhost')
- # List the tables available in this database.
- dbListTables(myDB)
- #Read data from MySQL
- try1 = fetch(dbSendQuery(myDB, "SELECT * FROM usermaster;"))
- try1
- try1$username
- #Insert Data to Table usermaster
- dbSendQuery(myDB, "INSERT INTO usermaster(username, password, userid) values('Tt51','t111','123')")
- stu = fetch(dbSendQuery(myDB, "SELECT * FROM students;"))
- stu
- courses = fetch(dbSendQuery(myDB, "SELECT * FROM course;"))
- courses
- (m1 <- merge(stu, courses, by.x = "id", by.y = "cid"))
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement