小编eng*_*nge的帖子

快速读取/写入xlsx文件的方法

这是一个后续问题这一个.将.xlsx文件读入R 的最快方法是什么?

library(xlsx)用来读取36个.xlsx文件的数据.有用.然而,问题在于这非常耗时(超过30分钟),尤其是在考虑每个文件中的数据不是那么大时(每个文件中的矩阵大小为3*3652).为此,请问有更好的处理这样的问题吗?还有另一种快速阅读.xlsxR的方法吗?或者我可以快速将36个文件放入单个csv文件然后读入R?

而且,我才意识到readxl不能写xlsx.是否有对应的处理写作而不是阅读?

"对那些投票反对的人的回应":

这个问题是关于事实,而不是所谓的"自以为是的答案和垃圾邮件",因为速度是时间和时间是事实但不是意见.

进一步更新:

或许可以用简单的语言向我们解释为什么某些方法的工作速度比其他方法快得多.我当然对此感到困惑.

r xlsx

12
推荐指数
1
解决办法
6469
查看次数

应用CSS使ioslides样式的代码更小

我正在使用R Studio的ioslides演示模式来显示简单线性回归模型的结果,我将稍后应用Shiny的东西.但是,回归的摘要有点长,所以我希望代码适合一张幻灯片.为了做到这一点,我无法找到使字体变小的方法.我的研究指出了一个自定义CSS文件,但我尝试过的所有标签都没有做任何事情.我正在引用default.css中给出的原始CSS .

CSS的"标题 - 幻灯片"部分可以使标题更小,但我不明白为什么CSS的"代码"部分不能使打印代码的字体变小.

Rmd文件:

title: "Regression Presentation"
runtime: shiny
output:
ioslides_presentation:
    css: shinyprezcss.css
    widescreen: yes


## Results {.smallcode}
```{r,echo=FALSE}
    lemon <-read.csv("LemonData.csv")
```
```{r,}
    model.fit.1<-lm(y~(x1+x2+x3+x4+x5)^2,lemon)
    summary(model.fit.1)
```
Run Code Online (Sandbox Code Playgroud)

CSS文件:

.smallcode code {
    font-size: 60%;
}

.title-slide hgroup h1 {
    font-size: 65px;
    line-height: 1.4;
    letter-spacing: -3px;
    color: #515151;
}
Run Code Online (Sandbox Code Playgroud)

r r-markdown

5
推荐指数
1
解决办法
2589
查看次数

在维护文件结构时强制另存为XLSM

所以我正在使用XLTM文件,我希望用户确保它们保存为XLSM.当他们点击"保存"时,这工作正常,但我发现当他们点击"另存为"时,文件将保存为"*.xlsm.xlsm".我有点迷失了如何确保用户保存为XLSM,同时保持文件名为"filename.xlsm"而不是"filename.xlsm.xlsm".

    'Action makes sure the user saves as XLSM file type.
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) 
    Dim FileNameVal As String 
    If SaveAsUI Then 
        FileNameVal = Application.GetSaveAsFilename(, "Excel Macro-Enabled Workbook (*.xlsm), *.xlsm") 
        Cancel = True 
        If FileNameVal = "False" Then 'User pressed cancel
            Exit Sub 
        End If 

        Application.EnableEvents = False 
        ThisWorkbook.SaveAs Filename:=FileNameVal & ".xlsm", FileFormat:=ThisWorkbook.FileFormat 
        Application.EnableEvents = True 
    End If 
End Sub 
Run Code Online (Sandbox Code Playgroud)

我认为问题可能是在写".xlsm":

ThisWorkbook.SaveAs Filename:=FileNameVal & ".xlsm", FileFormat:=ThisWorkbook.FileFormat 
Run Code Online (Sandbox Code Playgroud)

但是,如果没有写".xlsm",我会发现该文件保存为错误的文件后缀.(例如,如果我的XLTM文件名为Template(File001).xltm,并且用户打开一个新模板文件,它将另存为模板(File001)1(认为"1)1"是文件类型).

它可能是我的代码的结构,所以我需要指导如何修改它.

excel filenames vba excel-vba before-save

4
推荐指数
1
解决办法
3万
查看次数

标签 统计

r ×2

before-save ×1

excel ×1

excel-vba ×1

filenames ×1

r-markdown ×1

vba ×1

xlsx ×1