# #设置,包括= FALSE ----------------------------------------------------- knitr: opts_chunk美元集(echo = TRUE,消息= FALSE,错误= FALSE, fig.width = 7,fig.height = 6 ) ## ----------------------------------------------------------------------------- (“graph_toy库(diffuStats)数据 ") ## ----------------------------------------------------------------------------- graph_toy情节(graph_toy ) ## ----------------------------------------------------------------------------- 美元input_vec < - graph_toy input_vec头(input_vec15 ) ## ----------------------------------------------------------------------------- 长度(input_vec ) ## ----------------------------------------------------------------------------- output_vec < - diffuStats::扩散(图= graph_toy方法=“原始”,分数= input_vec)头(output_vec 15 ) ## ----------------------------------------------------------------------------- igraph:情节。Igraph (graph_toy，顶点。color = diffuStats:: scores2colors (output_vec)，顶点。形状= diffuStats: scores2shapes (input_vec),主要= "晶格扩散的分数 " ) ## ----------------------------------------------------------------------------- input_mat < - graph_toy input_mat头(input_mat美元 ) ## ----------------------------------------------------------------------------- output_mc < - diffuStats::扩散(图= graph_toy =“mc”方法,分数(output_mc = input_mat)的头 ) ## ----------------------------------------------------------------------------- score_col < - 4 igraph:情节。Igraph (graph_toy，顶点。color = diffuStats:: scores2colors (output_mc[， score_col])，顶点。形状= diffuStats:: scores2shapes (input_mat [, score_col]),主要= "晶格扩散的分数 " ) ## ----------------------------------------------------------------------------- df_perf < -性能(图= graph_toy分数= graph_toy input_mat美元,验证= graph_toy input_mat美元[15,],grid_param =扩张。网格(方法= c(“生”、“毫升”)))df_perf ## ----------------------------------------------------------------------------- df_perf < -性能(图= graph_toy分数= graph_toy input_mat美元(1:20,3:4),验证= graph_toy $ input_mat 21:48 3:4, grid_param =扩张。网格(方法= c(“生”、“毫升”)))df_perf ## ----------------------------------------------------------------------------- sessionInfo ()