日記

RScriptでSVGを生成

初版 2019/08/24 05:58

この回転する色相環はSVGで記述されている。

Art_4.svg

SVGのソースを見るとわかるんですが、この同じようなオブジェクトの記述を一つ一つ書いていては大変だ。

プログラムでSVGのソースを生成すれば、記述ミスもなく一気に大量のオブジェクトを定義できる。

ということで、RScriptで書いてみた。

[Art_4.r]

hdr='<svg xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink" style="background:black">'

til='</svg>'

bdy=c(); idx=0;

x=seq(1,1280,320); y=seq(1,960,320);

for(i in x){

for(j in y){

dur=Random(1,60)

bdy[idx+1]=paste('<image x="',i,'" y="',j,'" width="320" height="320" xlink:href="ring.png">',sep="")

bdy[idx+2]=paste('<animateTransform attributeName="transform" attributeType="XML" type="rotate" dur="',dur,'s" from="0 ',i+160,',',j+160,'" to="360 ',i+160,',',j+160,'" repeatCount="indefinite" />',sep="")

bdy[idx+3]="</image>"

idx=idx+3

}

cat(hdr,bdy,til,sep="\n",file="Art_4.svg")

file.show("Art_4.svg")

#プログラミング

« 前の Labログへ

次の Labログへ »

Author

実験音楽工房（A･COMPANY）

様々なプログラミング言語を使って、音楽を自動作曲しています。

使用している言語

・awk
・COBOL
・JavaScript
・R
・サクラ
・ドリトル
・なでしこ

山澤昭彦音楽関係プロフィール

山形県鶴岡市出身。1946年生まれ。尺八を学生時代に青木静夫（二代青木鈴募）・横山勝也の各氏から学ぶ。退職後にリコーダーを細岡ゆきに師事。
ブログラム言語を使って音楽を生成する「Generative Music」のアルバムを多数制作、近年はコンビュータを使った映像作品と生成音楽を組み合わせた「実験音楽工房展」を東京などて開催したほか、尺八古典本曲の演奏や多ジャンルのミュージシャンやダンサーとのコラボレーションなど、複合的なアート活動にも取り組んている。

2011年「実験音楽工房 A･COMPANY」プログラムによる生成音楽制作開始
2012年「音系・メディアミックス同人即売会 M3」出展（2012 - 2015年）
2015年「厚木リコーダーオーケストラ」入団（2019年退会）
2015年「実験音楽工房展 2015」東京・山形
2016年「実験音楽工房展 2016」東京・山形・鶴岡
2017年「実験音楽工房展 2017」東京・鶴岡
2018年「県立鶴岡南高等学校吹奏楽研究会 50周年記念コンサート」企画開催
2018年「大人のリコーダーアンサンブル」（NHK文化センター庄内教室）講師
2019年「鶴岡水上の音楽祭」芸術監督
2019年「尺八と生成映像による観音」ライブシリーズを開始
2020年「佳興の会」をプロデュース現在も年4回の邦楽ライブを開催中
2020年「アンサンブル・チコーニア」結成活動開始
2020年「K×I×Y 三人展 vol.1 - 時の断片 -」SoundScape 2020
2021年「酒井家庄内入部400年記念事業七絃琴復興プロジェクト」代表
2022年「K×I×Y 三人展 vol.2 - 時の戯れ -」フラクタルの樹・家具の音楽
2022年「酒井家庄内入部400年記念事業芸術祭参加」音楽絵巻その2
2023年「K×I×Y 三人展 vol.3 - 時の覚醒 -」四字熟語・ピアノのための響
2023年「鈴木順子×山澤昭彦二人展 MindScape」@ 鶴岡アートフォーラム
2023年「山澤昭彦とその界隈」@ TACTおとアート2023
2024年「鈴木順子×山澤昭彦二人展 CosmicEgg」@ 御茶ノ水 Gallery 蔵
2024年「Sa･Kura Music Week 2024」@ 御茶ノ水 Gallery 蔵
2025年「祈りの残照：尺八古典本曲演奏会」@ 東京大学東洋文化研究所

https://yamazawa.bandcamp.com/

Timeline

17人がフォロー中

Items

1,163
Lab Logs

100
Likes

781

Since August 2019