Re: 共起ネットワークのedgeをきれいに描きたい (田村貴紀) KH Coder 旧掲示板

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

作図は、

下記に掲載予定です。

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」
> > というファイルに保存されるかと思います。