## ----加载马提尼--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- head(minigwas$fam)## ----印刷地图----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------》----创建GS网络---------------------------------------------------------------------------------------------------------- gs <-GET_GS_NETWORK(MINIGWAS)PAR(MAR = C(0,0,0,0)+。1)图(GS)## ---创建GM网络 - - - - - - - - - - - - - - - - - - - - - - - - -------- gm <-get_gm_network(minigwas,snpmapping = minisnpmapping)par(mar = c(0,0,0,0)+。1)图(gm)## ----创建GI Network-创建GI Network------------------------------------------------------------------------------------------ gi <-get_gi_network(Minigwas,snpmapping = minisnpmapping,ppi = minippi)par(mar = c(0,0,0,0,0)+。1)图(gi)## ------------GridSearch --------------------------------------------------------------------------------------锥<-Scones。简历(Minigwas,GI)## --------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- head(cones)