R语言mysql包原理_R语言RMySQL包的使用注意事项

library(RMySQL)

# library(ggplot2)

# library(reshape)

options(warn=-1)

conn

username="gaoyang922",

password="gaoyang922@123456!",host="10.10.109.62",port=1333)

query

insert_time,stay_time,page_url ,leave_time from

tracker.hbase_visit ;")

result

n=2是取前2条数据

#获取连接信息，查看database下所有表，

#以及删除testname表 summary(con) dbGetInfo(con) dbListTables(con)

dbRemoveTable(con,"test")

dbDisconnect(conn)

# head(result)

# str(result)

result$insert_date

result$insert_time

# head(result)

#首页停留时间计算

result_page_stat_time

result_page_stat_time

)

# head(result_page_stat_time)

result_page_stat_time$stay_time1800,1800,result_page_stat_time$stay_time)

pagehome_stat_time

colnames(pagehome_stat_time)

#首页平均跳出率

result_page_jump

# head(result_page_jump)

result_page_jump$bounce

& result_page_jump$leave_time==0 ,1,0)

temp

colnames(temp)

page_bounce

colnames(page_bounce)

page_bounce

"date")

page_bounce$hp_bounceRate

#详情页停留时间计算

result_detail_stat_time

result_detail_stat_time

)

# head(result_detail_stat_time)

result_detail_stat_time$stay_time

1800,1800,result_detail_stat_time$stay_time)

detail_stat_time

colnames(detail_stat_time)

#详情页跳出率

result_detail_jump

result_detail_jump$bounce

& result_detail_jump$leave_time==0 ,1,0)

# head(result_detail_jump)

temp

colnames(temp)

detail_bounce

colnames(detail_bounce)

detail_bounce

= "date")

detail_bounce$detail_bounceRate=detail_bounce$detail_bounce/detail_bounce$detail_pv

total_stayTime_bounceRate

by.x="date"),by="date")

# head(total_stayTime_bounceRate)

conn

username="root",

password="Pa123456!",host="202.69.27.239",port=8443)

# dbSendQuery(conn,'SET NAMES utf8')

dbSendQuery(conn,"delete from

total_staytime_bouncerate")

dbWriteTable(conn, value =total_stayTime_bounceRate, name =

"total_staytime_bouncerate", append = TRUE ,row.names =

F)

dbDisconnect(conn)

#覆盖写testB覆盖test表

dbWriteTable(con,"test",testB,overwrite=T,row.names=F)

dbReadTable(con,"test")