- 博客(20)
- 问答 (1)
- 收藏
- 关注
RSS订阅原创 时间变化图
rm(list = ls())library(ggplot2)library(dplyr)library(“readxl”)setwd(“F:/论文/博士文章1/数据”)#data <- read_xlsx(“14-3重新1.xlsx”, sheet = “Sheet4”)data <- read.csv(“rich_All.csv”)dataclass<−as.factor(dataclass <- as.factor(dataclass<−as.factor(dataclass)#“#220
2025-01-02 01:11:54
904
原创 将raster合并成一张栅格图
library(raster)setwd(“H:/wy/SAVI1”)tif_files <- list.files(path = “H:/wy/RVI/2005”, pattern = “*.tif”, full.names = TRUE)rasters <- lapply(tif_files, raster)merged_raster <- do.call(merge, rasters)writeRaster(merged_raster, filename = “2005RVI.tif”, forma
2024-12-31 16:52:45
212
原创 αβγ稳定性_周
library(tidyverse)df1 = openxlsx::read.xlsx(‘zhouxi.xlsx’,sheet = 2)[,c(2:4,6,14:28)] %>%mutate(across(where(is.numeric), ~ifelse(is.na(.), 0, .)))table(df1$plot)t = df1 %>% group_by(type.y,plot,country) %>% summarise(n=n(), .groups = ‘drop’) %>% filter
2024-10-31 15:30:01
318
原创 混合模型作图
#第一步引用所有包setwd(“F:\论文\博士文章1\数据”)#读入抽平后的otu表#下面几步对于图中大的点非常重要#第三部作图。
2024-10-03 23:02:36
794
原创 多样性代码
setwd(“F:/论文/博士文章1/数据”)y <- read_excel(“14-3重新.xlsx”,sheet = “生物量多样性原始安全价值”)dim(data)head(adiv)
2024-09-20 17:08:37
557
1原创 多样性计算
setwd(“F:/论文/博士文章1/数据/shiyan/Yue Wang”)setwd(“F:/整理数据/三江源数据/汪悦监测表整理/频度数据整理”)
2024-01-30 22:38:16
1184
原创 箱线图加看两者之间的显著性
ggsave(“AGB关系.tiff”,path = “F:/论文/博士文章1/0tu数据/模型”,width = 15,height =13.5)tiff(“AGB关系.tiff”,width = 200,height = 180,units = “px”)legend.text = element_text(color=“black”, # 设置图例标签文字。labs(x=“type”,y=“AGB”) +# 添加标题，x轴，y轴内容。color = “black”, # 颜色。
2023-10-26 23:24:53
534
原创 制作箱线图并查找组间差异
y_position = c(1270,1300,1330,1240,1210,1270), # 设置显著性线的位置高度。values=c(“#85B22E”,“#5F80B4”,“#E29827”,“#922927”))+ #颜色。geom_boxplot(mapping=aes(x=x,y=AGB,colour = x ), #箱线图。tip_length=c(0,0,0,0,0,0,0,0,0,0,0,0), # 修改显著性线两端的长短。color = “black”, # 颜色。
2023-10-11 14:54:06
318
原创 如何将excel多列相加为一列并且有NA和0的分开计算
IF(OR(L2=0,M2=0,N2=0,O2=0,P2=0,Q2=0,R2=0,S2=0,T2=0,U2=0,V2=0,W2=0,X2=0,Y2=0,Z2=0),“是”,“否”)=SUM(L2:Z2)#SUM()与L2+…+Z2对有NA的值计算结果不一样。如何将这些数据转化为一列（并且0和NA不一样）=IF(AA2=“否”,AB2,0)需要excel三列计算。
2023-07-02 22:06:58
258
空空如也
r语言中下载和安装tensorflow和keras都成功了 但运行却不行？
2020-07-07
TA创建的收藏夹 TA关注的收藏夹
TA关注的人