利用RODBC包从PostgreSQL数据库中查询股价日数据和周数据

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

数据库共708.6万行，数据388MB，索引213MB共600MB。查周数据第一次查询587行用281ms，以后几次为47ms和63ms，查日数据2846行，花费125ms。

没有进行过SQL的优化，谁能改进查询请在下面跟贴。下面是我的代码：

library(RODBC)
#连接数据库
channel <- odbcConnect("postgresql35w", uid="postgres", pwd="admin")

#从股价数据库中读入上证日指数
a<- sqlQuery(channel ,"
SELECT
  stockprice.date,
  stockprice.price
FROM
  public.stockprice
WHERE
  stockprice.code = 'SH000001' AND
  stockprice.date > '1997-10-28'
ORDER BY
  stockprice.date ASC")

#从股价数据库中读入深证日指数
sz<- sqlQuery(channel ,"
SELECT
  stockprice.date,
  stockprice.price
FROM
  public.stockprice
WHERE
  stockprice.code = 'SZ399001' AND
  stockprice.date > '1997-10-28'
ORDER BY
  stockprice.date ASC")

#从股价数据库中读入相关股票周价格
gg<- sqlQuery(channel ,"
select * from
  (select LAST_VALUE(date) OVER (PARTITION  BY to_char(date , 'IYYYIW')) as Wdate,
          LAST_VALUE(price)  OVER (PARTITION  BY to_char(date , 'IYYYIW')) as Wprice
    from (
SELECT
    stockprice.date,
    stockprice.price
FROM
    public.stockprice
WHERE
    stockprice.code = 'SH600030' AND
    stockprice.date > '1997-10-28'
ORDER BY
    stockprice.date ASC) as  ap) as week
group by Wdate , Wprice
order by Wdate")
#断开数据库连接
odbcClose(channel)

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏1 回帖

关键词：PostgreSQL RODBC包 SQL数据库 RODBC post 数据库 查询 股价 PostgreSQL RODBC

学习了，谢谢：）

有个RPostgresql的包可以不通过ODBC连接上POSTGRESQL

在pgAdmin III中所做的解释查询：

R语言貌似很高深！

学习了，谢谢分享！