- エラーなどうまく動かない場合は、一番下のFAQをお読みください。
- ICレコーダの録音データから変換されたスペクトログラムを
RStudio
上で表示します。 - 見覚えのある声紋があればクリックし、メニューから種名を選択することで、日時と種名が
csv
ファイルに出力されます。 - 迷う場合はメニューから"再生"を選べば、音が再生できます(
SoX
のインストールが必要)。 - 再生の後にわかれば種名を選び、わからなければ不明種(WAY?: Who Are You?)としてクリック前後の数秒の音を保存できます。
-The spectrogram converted from the recording data of the IC recorder is displayed on
RStudio
. -Click on a familiar voiceprint and select the species name from the menu. The date and species name will be output to thecsv
file. -If you are unsure, select "Play" from the menu to play the sound (SoX
must be installed). -Select a species name if you know it after playback, and save a few seconds before and after clicking as an unknown species (WAY ?: Who Are You?).
- MacOSX
- Windows10
- 多分Linux系もOKでしょう
R
RStudio
SoX
No. | soft | version | link |
---|---|---|---|
1 | SoX | v14.4.2 | qiita |
2 | R | R3.6.1 | cran.r-project.org |
3 | RStudio | Version 1.2.5001 | rstudio |
編集中
ファイル名を下記の666形式の録音日時に変更してください。
例えば、2019年05月01日23:00:00から翌日の05月02日02:00:00までの音源データなら
"開始日にち_開始時刻-終了時刻_xxx.拡張子
”という風に変更してください。”_”と”-“を区別してください。xxxの部分はあってもなくても構いません。
original filename: DS700143.WMA
modified filename: 190501_230000-020000_DS700143.WMA
これを6_6-6形式とあるいは単純に666形式と呼んでいます。
$tree -d
.
└── toriR_demo
├── 190501
└── ORG
- ICレコーダの音源はORGというフォルダに入れてください。その親のフォルダに日にち毎のディレクトリが作られて、そこに音声ファイル(.wav)と、スペクトログラム(.png)、設定ファイル(.psgrm)ができます。()は拡張子です。
toriR
is based on processing for one hour. For example, if the recording is 1 hour from 23:00:00 on May 01, 2019, the following input files are required:
(toriRは1時間分の処理を基本としており、例えば録音が2019年05月01日23:00:00から1時間の場合、次の入力ファイルが必要です)
Input files:
190501_230000-000000.wav(sound:音声ファイル)
190501_230000-000000.psgrm(parameter:パラメータファイル)
190501_230000-000000_P05.png(spectrogrum for four minutes:4分のスペクトログラム)
~
190501_230000-000000_P15.png
Output file is csv
file
The output file of toriR
is a csv
file, and the output information is "date, time, species name and clickpoint frequency" obtained by clicking the spectrogram and selecting the bird list.
(toriR
の出力ファイルはcsv
ファイルで、クリックとリスト選択された結果が出力されます。それらの情報は、"日にち、時刻、種名とクリックした周波数"で、1行毎に出力されます。))
Output file: 190501_230000-000000.csv
# value is default.
fftsize=1024;#Fast Fourie Transfer size (512 or 1024)|FFTサイズ
f_lcf=0000; #Frequency of low cut filter[Hz]|周波数の加減
f_hcf=12000; #Frequency of high cut filter[Hz]|周波数の上限
height_image="125"; #Image height of Spectrogram
ratio_clip="20"; #Clipping ratio of sound spectrogram generated
thrsd_clip_lo="-200"; #Threshold of clipping value of low side of spectrogram gererated
thrsd_clip_hi="-100"; #Threshold of clipping value of high side of spectrogram gererated
window_time="60"; #Spectrogram time window|スペクトログラムの時間幅
width_image="624"; #Image width of Spectrogram
windows_a_page="4"; #Spectrograms a page|1頁のあたりのスペクトログラム
- Open
RStudio
; #RStudio
を開く - Load 'toriR.R
code; #
toriR`コードを読み込む
- Set date parameter
date_analysis
: date_analysis <- 190501;(date_analysis
を6桁の日にちを指定) - Set time parameter
time_analysis_sart
as a charactor: (time_analysis
を文字列として開始時刻を指定する) - Edit candidates of bird's name of
spices
as a vector: (spices
に鳥の声の種名を登録する。種名を""の中に入れる)
spices <- c(
"play", "WAY|save", "noise", "owl", "White's Thrush", "Japanese Green Pigeon"
);
- Edit playing setting(option)(再生の設定(オプション))
`volume` <- 8;# play volume;(再生音量の`volume`を設定)
`length_preplay` <- 1.; # length of playing time befor click(クリックより前の再生時間)
`length_play` <- 3; # length of playing time after click(クリックの後の再生時間)
- Run of all
toriR
source code (toriR
の全てのソースコードを実行する) - Click bird's voice on the spectrogram image
(
toriR
のスペクトログラム画像上の鳥の声紋をクリック) - Select bird's name or play from list after moving focus on console) (コンソール上にフォーカスし、リストから鳥の名前を選ぶ)
- When move to the next page, click the white area outside of the spectrogrum range on Plots or press
ESC
key (次のページに移動するにはPlots上のスペクトログラムの範囲外の白い部分をクリックするかESC
キーを押す) - When skip the rest of pages, press
ESC
immediately after clicking on the plot (残りのページをスキップしたい場合は、プロット上をクリックした直後にEsc
キーを押します)
190501_230000-000000.csv
- [Q:Win]フォルダ名入力しCtrl+A→Ctrl+Enterを行ったところ文字化けしてエラーになってしまいました。
- RStudioでtoriRを読み込ませて文字化けする場合は
Reopen with encording
でUTF-8
を選んで呼んでください。
- RStudioでtoriRを読み込ませて文字化けする場合は