####初回のみ実行####
install.packages("pedigreemm")
install.packages("dplyr")

####Excelからコピーする場合####
testped<-read.delim("clipboard",header=F)
testgroup<-read.delim("clipboard",header=F)

####CSVファイルから読み込む場合####
testped<-read.csv("testped.csv",header=F)
testgroup<-read.csv("testgroup.csv",header=F)


source("GRC.R")
GRC(peddata=testped,groupdata=testgroup,name="test1",GRCmethod=2,RLSmethod=1,conftable=T,inbcoef=T,rlscoef=T,grc=T,Cleandata=T)