Tao Wen

引子

方程分析的包目前正在重构，大家耐心等待，这是一年前我开始做这个包的时候的细节，从这里大家就可以学会如何做差异分析和可视化。

library(tidyverse)

library(agricolae)

library(car)

library(reshape2)

需求

在很多时候，我们的需求其实很简单，做一个数据描述，方差分析和基本图形的展示； 在做方差分析之前，我们需要对数据进行正太检验，方差齐性检验。方差分析之后，我们做多重比较。

我们做正态检测

####数据导入setwd("F:")

data_wt = read.table("R语言入门.txt", header = T,

row.names= 1, sep="\t");head(data_wt,n = 10L)

##      group   Tn

## CK1     CK 1.10

## CK2     CK 1.11

## CK3     CK 1.20

## CK4     CK 1.02

## CK5     CK   NA

## BOF1   BOF 2.00

## BOF2   BOF 2.10

## BOF3   BOF 2.01

## BOF4   BOF 2.03

## BOF5   BOF 3.03

##数据整理colnames(data_wt) = c("group","TN")

head(data_wt)

##      g