network 对纯数字的数据进行网络图的绘制，然后进行FR布局，具体实现方法

可以使用network包中的network函数对纯数字数据进行网络图的绘制，然后使用network.layout.fruchtermanreingold函数进行FR布局。具体实现方法如下：

1. 首先，需要安装并加载network包，可以使用以下命令进行安装：

install.packages("network")

然后，可以使用以下命令加载network包：

library(network)

2. 接着，将纯数字数据转换为network包支持的格式，可以使用以下命令：

mymatrix <- as.matrix(your_data)
my_network <- network(mymatrix, directed = FALSE)

在上述代码中，mymatrix代表纯数字数据，my_network代表转换后的网络图对象，directed参数指定网络图是否为有向图，这里设为FALSE表示无向图。

3. 然后，可以使用plot函数对网络图进行绘制，并使用network.layout.fruchtermanreingold函数进行FR布局，具体代码如下：

plot(my_network, layout = network.layout.fruchtermanreingold(my_network))

在上述代码中，plot函数绘制了网络图，layout参数指定了使用FR布局，使用network.layout.fruchtermanreingold函数对网络图进行布局。

4. 最后，可以根据需要对网络图进行一些微调，比如设置节点大小、边的颜色等等。

注意：在使用FR布局时，需要注意网络图的规模，过大的网络图可能会导致布局时间过长或者无法正常绘制。同时，由于network包和qgraph包在绘制网络图时使用的布局算法不同，因此可能会导致布局的结果也不同。如果需要在两个包之间进行切换，需要对数据进行适当的转换。