美文网首页
工具:Rmarkdown生成markdown文件,用于撰写博客

工具:Rmarkdown生成markdown文件,用于撰写博客

作者: 生信学习者2 | 来源:发表于2020-11-30 14:44 被阅读0次

在使用markdown撰写数据分析类的博客时,总是需要从Rmarkdown粘贴复制到markdown文件,后来才知道Rmarkdown可以直接生成markdown,因此使用以下两个函数用于撰写博客。更多知识分享请到 https://zouhua.top/

根据模板生成Rmarkdown文件

  1. 将常在markdown使用的参数放置在模板内,如

markdown的title部分

---
layout: post
title: ""
categories:
  - R
  - 可视化
tags:
  - 可视化
top: 100
password: password
abstract: "有东西被加密了, 请输入密码查看."
message: "您好, 这里需要密码."
wrong_pass_message: "抱歉, 这个密码看着不太对, 请再试试."
wrong_hash_message: "抱歉, 这个文章不能被校验, 不过您还是能看看解密后的内容"
mathjax: true
excerpt: ""
abbrlink: 
date: "2020-10-02 11:26:00"
updated: "2020-10-02 23:00:00"
---

加载通用r包部分

knitr::opts_chunk$set(warning = F, message = F, echo=T)
library(dplyr)

声明部分

### 引用
1. []()
参考文章如引起任何侵权问题,可以与我[联系](zouhua1@outlook.com),谢谢。
  1. 生成Rmardown函数
post_rmd <- function(rmd_name=NULL, 
                     template_name="template.Rmd"){
  
  if(length(rmd_name) == 0){
    stop("Please give the name of Rmarkdown")
  }
  
  temp_file  <- paste(template_name, sep="/")
  rmd_file     <- paste0(rmd_name, ".Rmd")
  content   <- readLines(temp_file)
  writeLines(content, rmd_file)
  print("New Rmarkdown is created successfully!")
}
  1. 运行
post_rmd(rmd_name = "R_packages_dplyr",
         template_name = "template.Rmd")

根据Rmarkdown生成markdown

  1. 函数
post_md <- function(md_name=NULL,
                                 rmd_name=NULL,
                                rmd_path=getwd(),
                                md_path=getwd()){

  rmd_file   <- paste(rmd_path, rmd_name, sep="/")
  md_file     <- paste0(md_path, "/", md_name, ".md")
  
  knitr::knit(input = rmd_file   , output = md_file)
  print("New markdown is created successfully!")
}
  1. 运行
post_md(md_name = "R_packages_dplyr",
        rmd_name = "R_packages_dplyr.Rmd")

引用

参考文章如引起任何侵权问题,可以与我联系,谢谢

相关文章

网友评论

      本文标题:工具:Rmarkdown生成markdown文件,用于撰写博客

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