scripts/ChinaHW_cluster/tests/temp_s2_挑选站点.Rmd:
## content
- [ ] 粗略挑选站点,去除年份过短的站点
```{r}
## content
- [ ] 粗略挑选站点,去除年份过短的站点
```{r}
title: "20180828_通道站点统计"
author: "wzy"
date: "2018年8月28日"
## -----------------global functions-------------------
# 对于发生迁移的气象站点应该如何处理
#'param i: 1, 2, 3分别代表首、中、尾
## -----------------global functions-------------------
# 对于发生迁移的气象站点应该如何处理
#'param i: 1, 2, 3分别代表首、中、尾
,label = ~label,popup = ~popup,color = ~pal(col),group = "全部站点") %>%
addCircleMarkers(data=gg,label = ~label,popup
## 匹配站点
library(purrr)
library(data.table)
## 匹配站点
library(purrr)
library(data.table)
# - `Radiation`: `W m-2`
# - `PPFD_IN`, `CO2_F_MDS`: `µmolPhoton m-2 s-1
R: 查询千牛日志按导购人员
getQN_log_byCspNameR Documentation
查询千牛日志按导购人员
d_mov <- st_moveInfo # previous version location info
st_moveInfo_raw <- fread("data-raw/mete2481_站点变迁记录-(195101-201812
```{r}
st_moveInfo <- fread("data-raw/mete2481_站点变迁记录-(195101-201812).csv")
# 1961年之前,数据有较多的错误
:\\data\\sx_raw\\基础数据\\站点管理\\all.csv",stringsAsFactors = F)
allstation$省 <- substr(allstation$行政区划,1,4)
hljjdstation
d_mov <- st_moveInfo # previous version location info
st_moveInfo_raw <- fread("data-raw/mete2481_站点变迁记录-(195101-201812
R: 导入包
const macros = { "\\R": "\\textsf{R}", "\\code": "\\texttt"};
function processMathHTML() {
R: 中油加油站
get_cpcR Documentation
中油加油站
R: 导入Microsoft PowerPoint PPTX
const macros = { "\\R": "\\textsf{R}", "\\code": "\\texttt"};
function
R: 导入Microsoft PowerPoint PPTX
imp_pptxR Documentation
导入Microsoft PowerPoint PPTX
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.