物件 <- PhyloEM公司 ( 门(phylo)= 猴子 $ 物理,
Y_数据= 猴子 $ 日期,
过程= “scOU” , ##标量OU模型
随机.root= 真的 , ##根部静止
平稳.root= 真的 ,
nbrα= 4 , ##测试的α值数量(应提高)
K_最大值= 10 , ##最大班次数
平行_α= 真的 , ##这可以设置为TRUE
N核= 2 ) ##并行计算
物件
## | | | 0% | |====== | 9% | |============= | 18% | |=================== | 27% | |========================= | 36% | |================================ | 45% | |====================================== | 55% | |============================================= | 64% | |=================================================== | 73% | |========================================================= | 82% | |================================================================ | 91% | |======================================================================| 100% | | | 0% | |====== | 9% | |============= | 18% | |=================== | 27% | |========================= | 36% | |================================ | 45% | |====================================== | 55% | |============================================= | 64% | |=================================================== | 73% | |========================================================= | 82% | |================================================================ | 91% | |======================================================================| 100% | | | 0% | |====== | 9% | |============= | 18% | |=================== | 27% | |========================= | 36% | |================================ | 45% | |====================================== | 55% | |============================================= | 64% | |=================================================== | 73% | |========================================================= | 82% | |================================================================ | 91% | |======================================================================| 100% | | | 0% | |====== | 9% | |============= | 18% | |=================== | 27% | |========================= | 36% | |================================ | 45% | |====================================== | 55% | |============================================= | 64% | |=================================================== | 73% | |========================================================= | 82% | |================================================================ | 91% | |======================================================================| 100%
##PhyloEM算法的结果。 ##默认方法选择的参数: ##具有随机平稳根的二维scOU过程。 ## ##根本期望: ##第1页第2页 ## 0.01552091 -0.01483439 ## ##根方差: ##PC1和PC2 ##PC1 3.630764e-04-9.029145e-05号 ##PC2-9.029145e-05 1.228925e-04 ## ##过程差异: ##PC1和PC2 ##PC1 1.475308e-04-3.668861e-05号 ##PC2-3.668861e-05 4.993556e-05号 ## ##工艺选择强度: ##第1页第2页 ##PC1 0.2031677 0.0000000 ##PC2 0.0000000 0.2031677 ## ##处理根最优值: ##PC1和PC2 ## 0.01552091 -0.01483439 ## ##转移分支上的位置:4、63、46 ##移位值: ## 4 63 46 ##PC1-0.01812684-0.093914264 0.08031859 ##PC2 0.05234025-0.008148889 0.02527294 ## ## ## ##请参阅帮助以查看所有绘图和处理功能。
##params_process中出现警告。 PhyloEM(res,K=5):有几个等价项 ##此换档位置的解决方案。
#任意旋转
θ <- 圆周率 / 4
腐烂 <- 矩阵 ( c(c) ( 余弦 (θ), - 罪 (θ), 罪 (θ), 余弦 (θ)),
nrow公司= 2 , ncol公司= 2 )
#旋转数据
Yrot公司 <- t吨 (腐烂) %*% 猴子 $ 日期
行名称 (伊洛特) <- 行名称 (猴子 $ 日期)
#基于旋转数据的PhyloEM
res_root(_R) <- PhyloEM公司 ( 门(phylo)= 猴子 $ 物理,
Y_数据= 伊洛, ##旋转数据
过程= “scOU” ,
随机.root= 真的 ,
平稳.root= 真的 ,
nbrα= 4 ,
K_最大值= 10 ,
平行字母= 真的 ,
N核= 2 )
## | | | 0% | |====== | 9% | |============= | 18% | |=================== | 27% | |========================= | 36% | |================================ | 45% | |====================================== | 55% | |============================================= | 64% | |=================================================== | 73% | |========================================================= | 82% | |================================================================ | 91% | |======================================================================| 100% | | | 0% | |====== | 9% | |============= | 18% | |=================== | 27% | |========================= | 36% | |================================ | 45% | |====================================== | 55% | |============================================= | 64% | |=================================================== | 73% | |========================================================= | 82% | |================================================================ | 91% | |======================================================================| 100% | | | 0% | |====== | 9% | |============= | 18% | |=================== | 27% | |========================= | 36% | |================================ | 45% | |====================================== | 55% | |============================================= | 64% | |=================================================== | 73% | |========================================================= | 82% | |================================================================ | 91% | |======================================================================| 100% | | | 0% | |====== | 9% | |============= | 18% | |=================== | 27% | |========================= | 36% | |================================ | 45% | |====================================== | 55% | |============================================= | 64% | |=================================================== | 73% | |========================================================= | 82% | |================================================================ | 91% | |======================================================================| 100%
#另一个旋转
θ <- 圆周率 / 三
旋转2 <- 矩阵 ( c(c) ( 余弦 (θ), - 罪 (θ), 罪 (θ), 余弦 (θ)),
nrow公司= 2 , 美国国家石油公司= 2 )
#旋转数据
Yrot2型 <- t吨 (旋转2) %*% 猴子 $ 日期
行名称 (Yrot2) <- 行名称 (猴子 $ 日期)
#基于旋转数据的PhyloEM
资源_区域2 <- PhyloEM公司 ( 门(phylo)= 猴子 $ 物理,
Y_数据= Yrot2、,
过程= “scOU” ,
随机.root= 真的 ,
平稳.root= 真的 ,
nbrα= 2 , ##请注意,这也可能不同
K_最大值= 10 ,
平行_α= 真的 ,
N核= 2 )
#合并
资源合并2 <- 合并旋转(_R) (res、res_rot、res_root2)
## | | | 0% | |====== | 9% | |============= | 18% | |=================== | 27% | |========================= | 36% | |================================ | 45% | |====================================== | 55% | |============================================= | 64% | |=================================================== | 73% | |========================================================= | 82% | |================================================================ | 91% | |======================================================================| 100% | | | 0% | |====== | 9% | |============= | 18% | |=================== | 27% | |========================= | 36% | |================================ | 45% | |====================================== | 55% | |============================================= | 64% | |=================================================== | 73% | |========================================================= | 82% | |================================================================ | 91% | |======================================================================| 100%
资源(_N) <- PhyloEM公司 ( 门= 猴子 $ 物理,
Y_数据= 猴子 $ 日期,
过程= “scOU” ,
随机.root= 错误的 , ##根需要修复
K_最大值= 10 ,
平行_α= 真的 ,
N核= 2 ,
nbrα= 4 , ##2个阴性,2个阳性(应该更多)
允许负值= 真的 ) ##允许网格中出现负alpha
## | | | 0% | |====== | 9% | |============= | 18% | |=================== | 27% | |========================= | 36% | |================================ | 45% | |====================================== | 55% | |============================================= | 64% | |=================================================== | 73% | |========================================================= | 82% | |================================================================ | 91% | |======================================================================| 100% | | | 0% | |====== | 9% | |============= | 18% | |=================== | 27% | |========================= | 36% | |================================ | 45% | |====================================== | 55% | |============================================= | 64% | |=================================================== | 73% | |========================================================= | 82% | |================================================================ | 91% | |======================================================================| 100% | | | 0% | |====== | 9% | |============= | 18% | |=================== | 27% | |========================= | 36% | |================================ | 45% | |====================================== | 55% | |============================================= | 64% | |=================================================== | 73% | |========================================================= | 82% | |================================================================ | 91% | |======================================================================| 100% | | | 0% | |====== | 9% | |============= | 18% | |=================== | 27% | |========================= | 36% | |================================ | 45% | |====================================== | 55% | |============================================= | 64% | |=================================================== | 73% | |========================================================= | 82% | |================================================================ | 91% | |======================================================================| 100% | | | 0% | |====== | 9% | |============= | 18% | |=================== | 27% | |========================= | 36% | |================================ | 45% | |====================================== | 55% | |============================================= | 64% | |=================================================== | 73% | |========================================================= | 82% | |================================================================ | 91% | |======================================================================| 100%
##params_process中出现警告。 PhyloEM(res_neg,K=0):“选择强度”是 ##消极。 人们应该只看移位的非正常值。 待办事项 ##因此,请使用“rBM=TRUE”调用此函数。
##检查选择强度警告(过程…):所有特征值 ##选择强度并没有严格意义上的正实部。 这可能会导致 ##一些问题。 请谨慎操作。
## ##具有固定根的二维scOU过程。 ## ## ##根值: ##PC1和PC2 ## 0.006507194 -0.003532184 ## ##工艺差异: ##PC1和PC2 ##PC1 5.367696e-05-5.648422e-06号 ##PC2-5.648422e-06 1.273209e-05 ## ##工艺选择强度: ##PC1和PC2 ##PC1-0.01316466 0.00000000 ##PC2 0.00000000-0.01316466 ## ##处理根最优值: ##PC1和PC2 ## 0.006507194 -0.003532184 ## ##这个过程没有变化。