library(RJDBC)
.jaddClassPath( "/home/517066/sqllib/SQLLIB/java/db2jcc_license_cu.jar" )
.jaddClassPath( "/home/517066/sqllib/SQLLIB/java/db2jcc4.jar" )

#Then we need to load the DB2 JDBC driver:
driver <- JDBC("com.ibm.db2.jcc.DB2Driver","home/517066/sqllib/SQLLIB/java/db2jcc4.jar")

#At this point we can establish a database connection:
conn = dbConnect(driver,
                 "jdbc:db2://ip:port/databaseName",
                 user="username",
                 password="password")
#Let’s run a query and #store the results into a data frame:
query = "SELECT * FROM SYSIBM.SYSTABLES WHERE NAME LIKE '%USER%'"

rs = dbSendQuery(conn, query)
data_frame = fetch(rs, -1)