美文网首页
R-代码优化

R-代码优化

作者: 富士山下裸奔 | 来源:发表于2018-04-01 12:00 被阅读0次

本文连接:Profiling R code
原创作者:xshi0001

Let’s solve the problem but let’s not make it worse by guessing. —Gene Kranz, Apollo13 Lead Flight Director.
\texbf{带着策略解决问题,而不是盲目猜测问题的所在}<em>带着策略解决问题,而不是盲目猜测问题的所在</em>

1. system.time()

作用:测试某个函数或者代码块运行时间,实用于已经知道哪一块代码运行问题
返回 pro_time 类对象,包含 user timeelapsed time
区别是:两类时间区别

Elapsed time > user time
system.time(readLines("http://baidu.com"))#花费更多的时间连接网站,而不是cpu处理上

注: memoise 缓存处理包

memoise 是一个非常简单的缓存包,以本地为基础,减少重复计算。当以相同的参数对同一个函数执行第二次计算的时候,可以直接用第一次计算过的结果作为计算结果。主要接口函数有memoizeforget

library(memoise)
func1 <- memoise(function(){
    Sys.sleep(1)
    runif(1)
}
)
system.time(func1())
system.time(func1())#第二次在对这个相同表达式求解不需要话时间
forget(func1) #清除缓存
system.time(func1)

2. Rprof() & summaryRprof()

Rprof()函数用于打印函数的调用关系和cpu的耗时数据,然后通过summaryRprof函数分析数据产生性能报告($by.total$by.self),左后使用profr库中的plot()函数可视化。

实例1:股票数据分析案例

bidpx1<-read.csv(file="000000_0.txt",header=FALSE) #读取数据
#交易日期、交易时间、股票ID、买一价、买一量、卖一价、卖一量。
names(bidpx1)<-c("tradedate","tradetime","securityid",
                 "bidpx1","bidsize1","offerpx1","offersize1")
bidpx1$securityid<-as.factor(bidpx1$securityid) #将彩票id转化成因子
head(bidpx1) #查看前6行
object.size(bidpx1) #查看文件大小
#以股票ID分组计算每小时买一价的平均值和买一量的总量
library(plyr)
fun1<-function(){
    datehour<-paste(bidpx1$tradedate, #paste("20130724", "14")
                    substr(bidpx1$tradetime,1,2),sep="") 
    df<-cbind(datehour,bidpx1[,3:5]) #按列合并
    ddply(bidpx1,.(securityid,datehour),summarize,price = mean(bidpx1),size = sum(bidsize1)) 
}
head(fun1())
system.time(fun1()) #以system.time()查看fun1函数运行时间
file<-"fun1_rprof.out" #定义性能日志函数的输出文件位置
Rprof(file) #开始性能监控
fun1() #执行计算函数
Rprof(NULL) #停止执行监控,并输出文件
summaryRprof(file) #通过summaryRprof函数解析这个监控文件

可视化工具profvis

# install.packages("profvis")
library(profvis)
library(ggplot2)
p <- profvis({          
  data(diamonds, package = "ggplot2")           
  plot(price ~ carat, data = diamonds)          
  m <- lm(price ~ carat, data = diamonds)           
  abline(m, col = "red")            
})
htmlwidgets::saveWidget(p, "title.html") #可以保存到工作空间下html文件
本地生成的html文件 在console中 输出p结果

参考阅读:

相关文章

  • R-代码优化

    本文连接:Profiling R code原创作者:xshi0001 Let’s solve the proble...

  • Python-02进阶-07代码优化技巧

    代码优化技巧 优化原则 核心技巧 其他技巧 Python 代码性能优化技巧 常用代码优化技巧 sort()优于so...

  • web前端开发编码规范及性能优化

    代码优化 这个部分仅仅将代码优化本身,不考虑性能,关于代码部分的性能优化在 页面渲染 部分 代码优化 中 HTML...

  • 编译器笔记46-代码优化-常用的代码优化方法

    优化的分类 机器无关优化: 针对中间代码 机器相关优化: 针对目标代码 局部代码优化: 单个基本块范围内的优化 全...

  • java综合知识点(四,优化篇)

    优化篇 一、代码优化 代码结构层次的优化(目的:更加方便代码的维护--可维护性,可读性) 1.代码注释(代码规范)...

  • 编译原理系列之十 代码优化

    代码优化 代码优化可分为与机器有关的优化和与机器无关的优化。与机器有关的优化一般在目标代码上进行。与机器无关的优化...

  • 腾讯做优化的大佬三下五除二让我程序快了200%

    这篇文章主要跟大家说说程序性能优化,说到程序性能优化咱们先来谈谈代码优化~ 代码优化 代码优化其实一个很重要的课题...

  • Android优化

    压缩APK文件 优化UI 内存优化 优化代码查看代码逻辑,提取通用代码设计模式 压缩APK文件 Android s...

  • 编译原理四——代码优化

    代码优化 代码优化的含义是:对代码进行等价变换,使得变换后的代码具有更高的时间效率和空间效率。代码优化的目的是提高...

  • 代码优化总结

    目录 代码优化的引出 代码优化的目标 代码优化细节(1)尽量指定类、方法的final修饰符(2)尽量重用对象(3)...

网友评论

      本文标题:R-代码优化

      本文链接:https://www.haomeiwen.com/subject/sbvocftx.html