共起ネットワークの線(edge)を美しく描きたいという質問です。svgで保存してpngの解像度が高いものに出力するときれいに書けますが、Rのスクリプトではどうすればいいか、という質問です。
英語の論文のためRのスクリプトの必要部分を英単語に変え、共起ネットワークを描いています。そうするとsvgで保存できないので、線がぎざぎざになります。なにか良い知恵があるでしょうか？

こんにちは、樋口です。書き込みありがとうございます。
ここではお久しぶりでしょうか。お気軽に掲示板お使いいただければ幸いです。

さて、Rのコマンドを使ってSVG形式で保存していただくのが一手かと思います。

#---------------------------------------
library(Cairo)
Cairo(
  width     = 640,
  height    = 640,
  file      = "c:/khcoder/net.svg",
  type      = "svg",
  onefile   = TRUE,
  bg        = "transparent",
  dpi       = 72,
  units     = "px",
  pointsize = 12
)
par(family="Meiryo UI")

# ここで共起ネットワーク作成

dev.off()
#---------------------------------------

「ここで共起ネットワーク作成」より上のコマンドを実行してから、*.rファ
イルをドラッグ＆ドロップして共起ネットワークを作成していただく形です。
その後「dev.off()」を忘れずに実行して下さい。

これで、Rの画面上に表示されるのではなく、かわりに「c:/khcoder/net.svg」
というファイルに保存されるかと思います。

ありがとうございます！！！
いつも大変お世話になります。
一度はうまく言って大喜びしましたが、書き換えて単語を英語にしたら

------------

> load("E:\\Dropbox\\khcoderbak\\datatatanga\\tatagangajapaG.rEng")
エラー: ファイルのマジック・ナンバーが不正です (ファイルが壊れているかもしれません)。データはロードされませんでした
追加情報: 警告メッセージ:
file ‘tatagangajapaG.rEng’ has magic number 'd <- '
Use of save versions prior to 2 is deprecated
---------------
が出て動かなくなりました。
とりあえず、スクリプト自体をメールでもお送ります。




> こんにちは、樋口です。書き込みありがとうございます。
> ここではお久しぶりでしょうか。お気軽に掲示板お使いいただければ幸いです。
>
> さて、Rのコマンドを使ってSVG形式で保存していただくのが一手かと思います。
>
> #---------------------------------------
> library(Cairo)
> Cairo(
> width = 640,
> height = 640,
> file = "c:/khcoder/net.svg",
> type = "svg",
> onefile = TRUE,
> bg = "transparent",
> dpi = 72,
> units = "px",
> pointsize = 12
> )
> par(family="Meiryo UI")
>
> # ここで共起ネットワーク作成
>
> dev.off()
> #---------------------------------------
>
> 「ここで共起ネットワーク作成」より上のコマンドを実行してから、*.rファ
> イルをドラッグ＆ドロップして共起ネットワークを作成していただく形です。
> その後「dev.off()」を忘れずに実行して下さい。
>
> これで、Rの画面上に表示されるのではなく、かわりに「c:/khcoder/net.svg」
> というファイルに保存されるかと思います。

おおおお、すみません。スクリプトの拡張子を間違っていただけでした。ああああ。
うまくいきました。ありがとうございます。
メールは無視なさってください。

作図は、

下記に掲載予定です。

https://www.amazon.co.jp/Routledge-Companion-Global-Internet-Histories/dp/1138812161/ref=sr_1_1?ie=UTF8&qid=1478248721&sr=8-1&keywords=Gerard+Goggin+internet

> ありがとうございます！！！
> いつも大変お世話になります。
> 一度はうまく言って大喜びしましたが、書き換えて単語を英語にしたら
>
> ------------
>
> > load("E:\\Dropbox\\khcoderbak\\datatatanga\\tatagangajapaG.rEng")
> エラー: ファイルのマジック・ナンバーが不正です (ファイルが壊れているかもしれません)。データはロードされませんでした
> 追加情報: 警告メッセージ:
> file ‘tatagangajapaG.rEng’ has magic number 'd <- '
> Use of save versions prior to 2 is deprecated
> ---------------
> が出て動かなくなりました。
> とりあえず、スクリプト自体をメールでもお送ります。
>
>
>
>
> > こんにちは、樋口です。書き込みありがとうございます。
> > ここではお久しぶりでしょうか。お気軽に掲示板お使いいただければ幸いです。
> >
> > さて、Rのコマンドを使ってSVG形式で保存していただくのが一手かと思います。
> >
> > #---------------------------------------
> > library(Cairo)
> > Cairo(
> > width = 640,
> > height = 640,
> > file = "c:/khcoder/net.svg",
> > type = "svg",
> > onefile = TRUE,
> > bg = "transparent",
> > dpi = 72,
> > units = "px",
> > pointsize = 12
> > )
> > par(family="Meiryo UI")
> >
> > # ここで共起ネットワーク作成
> >
> > dev.off()
> > #---------------------------------------
> >
> > 「ここで共起ネットワーク作成」より上のコマンドを実行してから、*.rファ
> > イルをドラッグ＆ドロップして共起ネットワークを作成していただく形です。
> > その後「dev.off()」を忘れずに実行して下さい。
> >
> > これで、Rの画面上に表示されるのではなく、かわりに「c:/khcoder/net.svg」
> > というファイルに保存されるかと思います。