[发明专利]一种基于R软件的入侵植物频度数量变化调查分析方法有效
申请号: | 201710695009.2 | 申请日: | 2017-08-15 |
公开(公告)号: | CN107391877B | 公开(公告)日: | 2020-09-29 |
发明(设计)人: | 黄小荣;侯远瑞;彭玉华 | 申请(专利权)人: | 广西壮族自治区林业科学研究院 |
主分类号: | G06F30/20 | 分类号: | G06F30/20;G06F8/33 |
代理公司: | 广西南宁汇博专利代理有限公司 45114 | 代理人: | 邹超贤 |
地址: | 530002 广西壮*** | 国省代码: | 广西;45 |
权利要求书: | 查看更多 | 说明书: | 查看更多 |
摘要: | |||
搜索关键词: | 一种 基于 软件 入侵 植物 频度 数量 变化 调查 分析 方法 | ||
1.一种基于R软件的入侵植物频度数量变化调查分析方法,其特征在于:主要操作步骤如下:
(1)在计算机上安装R软件及所需软件包:在https://www.R-project.org下载R 3.4.1或更高版本,根据提示直接运行安装,安装完成后,双击桌面R 3.4.1图标打开RGui视窗,从“程序包”菜单的下拉菜单中选择“安装程序包”,在弹出的“Secure CRAN mirrors”中选择“China”后“确定”,再在弹出的“Packages”中选择“MESS”后“确定”,安装好MESS程序包;使用类似过程安装“pwr”、“TrialSize”程序包;
(2)样地预调查:选择典型样地,以系统抽样法进行入侵植物频度数据的初步调查;调查以样线沿山脚——山顶方向设置,样线与样线平行且间隔7 m;并以1m×1m小样方块沿样线分布,随机起点、等距间隔6 m;记录64个1m×1m小样方块有无某一入侵植物之后,检查入侵植物出现的频度是否在20%~80%的范围内,如果频度低于或高于此范围,则需调整小样方块尺寸后重新开始预调查;
(3)单样本监测与达到给定精确度所需样本数计算:利用pwr程序包进 行计算:
library (pwr) ;
pwr.p.test (h=ES.h (p1, p2), sig.level=0.1, power=0.9);
将预调查中比例频度p1=有/(有+无)和给定精确度|p1-p2|中的比例频度p2代入上式,之后,将两条代码复制粘贴到RGui,回车得到样本数;
(4)两样本临时样地频度比较所需样本数计算:使用R软件自带功效分析函数计算,代码为:
;
将预调查中两样本入侵植物的比例频度p1和p2代入上式,在RGui中运算得到每个组所需样本数;
(5)两样本临时样地入侵植物频度差异显著性检测;临时样地两样本的调查数据分布如表1,采用卡方检验:
chisq.test(matrix (c(C11,C10,C21,C20), nrow=2)) ;
表1两样本临时样地入侵植物有无数据表
两样本临时样地入侵植物有无计数列表中的4个数值为样方个数计数;
(6) 两样本临时样地入侵植物频度变化检验的功效分析使用如下代码:
;
其中,p1、p2为两样本入侵植物比例频度,n为最终实测的样本大小,这3个数值代入上式后,复制粘贴到RGui,回车得到统计功效power;
(7) 两样本固定样地重复观测频度变化所需样本数的计算中,选择临床医学程序包TrialSize,计算得到的样本数最小也最合理;
(8) 两样本固定样地重复观测入侵植物频度变化显著性检验,使用McNemar检验,数据收集方法见表2:
表2固定样地两次重复观测数据表
在表2中,每个观测小样方块可能有4种表现:两次记录都有某一入侵植物p11、第一次有但第二次无p10、第一次无但第二次有p01、两次记录都无该入侵植物p00;4个数值用0~1比例频度表示,4个数值之和等于1;
两样本固定样地频度差异检验的代码如下:
mcnemar.test(matrix(c(p11, p10,p01,p00), nrow=2)) ;
另外,也可以采用按表2分列的计数数据;
步骤(2)所述调整小样方块尺寸是使入侵植物频度控制在40%~60%范围内,为观察其后续变化预留较大的空间;以p1代表用1m×1m小样方块预调查所得的某一植物百分频度,p1=((有/(有+无))×100),若要将这一植物的百分频度调整为p2,则调整后样方面积为:
(log(100)-log(100-p2))/ (-log(1-p1/100)) ;
步骤(3)、(4)、(5)、(7)所述的样本计算或功效分析中,选择α=0.10、β=0.10作为显著水平和功效大小,兼顾入侵植物监测中的误报与漏报两个方面;
步骤(8)所述两样本固定样地重复观测频度变化显著性检验中,选择MESS程序包来进行两样本固定样地重复观测入侵植物频度变化检验的功效分析,代码为:
library(MESS) ;
;
其中:n为每组小样方块的个数;psi=p01/p10或psi=p10/p01,psi≥1;paid=p01+p10。
该专利技术资料仅供研究查看技术是否侵权等信息,商用须获得专利权人授权。该专利全部权利属于广西壮族自治区林业科学研究院,未经广西壮族自治区林业科学研究院许可,擅自商用是侵权行为。如果您想购买此专利、获得商业授权和技术合作,请联系【客服】
本文链接:http://www.vipzhuanli.com/pat/books/201710695009.2/1.html,转载请声明来源钻瓜专利网。
- 上一篇:斜齿轮副时变啮合刚度计算方法
- 下一篇:一种以仿真为基础的产品设计方法