[原创][R语言]股票分析实战[5]:加载股票数据

[简介]

常用网名: 猪头三

出生日期: 1981.XX.XX

QQ联系: 643439947

个人网站: 80x86汇编小站 https://www.x86asm.org

编程生涯: 2001年~至今[共22年]

职业生涯: 20年

开发语言: C/C++、80x86ASM、PHP、Perl、Objective-C、Object Pascal、C#、Python

开发工具: Visual Studio、Delphi、XCode、Eclipse、C++ Builder

技能种类: 逆向 驱动 磁盘 文件

研发领域: Windows应用软件安全/Windows系统内核安全/Windows系统磁盘数据安全/macOS应用软件安全

项目经历: 磁盘性能优化/文件系统数据恢复/文件信息采集/敏感文件监测跟踪/网络安全检测

[序言]

为了后期文章的铺垫, 首先要学习一些基础的R语言编程技巧. 一个很重要的技术就是: R语言如何加载股票数据文件?

[list.files枚举文件]

假如有一个目录存着5000多只股票数据文件, 每一个文件代表一只股票, 并且命名格式为: 股票代码-股票名称.txt, 例如: 002431-棕榈股份, 那么可以利用list.files()来获取这些文件. 代码如下:

R 复制代码
# 加载目标目录
stock_Files <- list.files(path = "C:/Users/Win11_PHT/Desktop/KLines/", pattern = "^[0-9]{6}-.+\\.txt$", full.names = TRUE)
# 创建一个6列空数据框
stock_Data_Total <- data.frame(matrix(ncol=6))
stock_Data_Total <- stock_Data_Total[-1,]
colnames(stock_Data_Total) <- c("Date", "O", "C", "H", "L", "VOL")

# 循环文件路径列表
for(stock_File_Item in stock_Files)
{
  # 读取股票数据内容
  File_Content <- read.table(stock_File_Item, header = FALSE, sep = "|")
  # 确保列名相同
  colnames(File_Content) <- c("Date", "O", "C", "H", "L", "VOL")
  # 追加数据
  stock_Data_Total <- rbind(stock_Data_Total, File_Content)
}

备注: 上面代码, 这里需要进一步描述清楚, 加载的股票数据, 是一个包含6列的数据. 每一列名称依次为: "Date", "O", "C", "H", "L", "VOL" (日期, 开盘价, 收盘价, 最高价, 最低价).

[结尾]

代码虽然简单, 但是这里还是有一些重要的细节要注意, list.files是支持正则表达式的, 如果你不清楚正则表达式, 那么建议还是要先学习这个技术.

相关推荐
小研学术27 分钟前
如何开展有组织的AI素养教育?
大数据·人工智能·ai·大模型·deepseek·ai素养
TracyCoder1231 小时前
ElasticSearch深入解析(五):如何将一台电脑上的Elasticsearch服务迁移到另一台电脑上
大数据·elasticsearch·jenkins
Lucky GGBond1 小时前
解决 Elasticsearch 启动错误:failed to obtain node locks
大数据·elasticsearch·搜索引擎
zoujiahui_20181 小时前
R中实现数值求导的包numDeriv
r语言
柳如烟@1 小时前
Hadoop伪分布式模式搭建全攻略:从环境配置到实战测试
大数据·hadoop·分布式·mysql
曾经的三心草2 小时前
Git-基本操作
大数据·git·elasticsearch
反方向的空6 小时前
GIt基本操作
大数据·git·elasticsearch
Leo.yuan8 小时前
数据仓库建设全解析!
大数据·数据库·数据仓库·数据分析·spark
望获linux12 小时前
智能清洁机器人中的实时操作系统应用研究
大数据·linux·服务器·人工智能·机器人·操作系统