R语言 : RJDBC 连接 h2数据库，绘基金净值图

原创于 2018-07-21 15:32:44 发布 · 475 阅读

0 ·

CC 4.0 BY-SA版权

文章标签：

#RJDBC #h2database

R 专栏收录该内容

11 篇文章

订阅专栏

本文介绍如何利用H2数据库导入基金数据，并通过R语言查询基金净值，绘制基金净值走势图。示例代码展示了从CSV文件导入数据到H2数据库，连接数据库并查询指定基金的净值，最后使用R语言的绘图功能生成走势图。

H2database : 命令行: 类似 isql
java -cp /H2/bin/h2-1.3.jar org.h2.tools.Shell

CREATE TABLE JJJZ ;

insert into JJJZ (select * from CSVREAD('/H2/jjjz.csv'))

例如：查询基金净值，绘基金净值图，query_fund1.R

library(DBI)
library(RJDBC)
drv <- JDBC("org.h2.Driver","/H2/bin/h2-1.3.jar")
conn <- dbConnect(drv,"jdbc:h2:tcp://localhost/~/test","sa","")
#dbListTables(conn)
fund1 ='660005'
data <- dbGetQuery(conn,"select RQ,JZ from JJJZ where DM=?",fund1)
fundname <- dbGetQuery(conn,"select MC from JJMC where DM=?",fund1)
dbDisconnect(conn)
class(fundname)
head(data)
dates <- as.Date(data$RQ, "%Y-%m-%d")
attach(data)
fund1 <- paste(fund1, fundname$MC) # 基金代码 + 基金名称
plot(dates,JZ, type="l", lwd=1,  main=fund1, xlab="date", ylab="value", col="blue")
grid()
detach(data)