【Chrome Extension】permission不具合？
github.com
上記はIMSLP下のドメインのみ実行されるはずのChrome拡張だが、時々不適切なページでも実行される。
"permissions": [
"tabs",
"http://imslp.org/wiki/*"
],//"http://imslp.org/wiki/"でも同じ
Chrome拡張がうまく働かないサイトの例
http://www.wormbase.org/species/c_elegans/variation/WBVar00088923#02-45-3
【Excel VBA】マクロの中で別のマクロを呼ぶ
Call文を使う
Sub Example()
Call OtherMacro
End Sub
Excel VBAでライフゲームっぽいもの
Excel VBAを後輩に教える機会があって、後輩が作業している間につくったもの
大きくないフィールドなので、特にアルゴリズム上の工夫もなく、愚直にすべてのセルについて周りの8セルの状態を調べた。
最初に端以外の領域に適当に1を入れておき、適当な回数LifeGame()を実行する。
LifeGame()内でForループが実行されるたびにメッセージボックスが出力される(MsgBoxの代わりにスリープ機能を使うためには冒頭の文が必要である）。
1を入れたセルは条件付き書式設定により赤く表示するようにしている。
Declare PtrSafe Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Sub LifeGame()
For I = 0 To 7
Call Count
'Sleep 500
MsgBox "Next"
Next I
End Sub
Sub Count()
Dim Arr(100) As Integer
For I = 0 To 9
For J = 0 To 9
If Cells(I + 1, J + 1) = 1 Then
Arr(10 * I + J) = 1
Else
Arr(10 * I + J) = 0
End If
Next J
Next I
For I = 0 To 9
valCnt = 0
For J = 0 To 9
If 0 < I And I < 9 And 0 < J And J < 9 Then
valCnt = Arr((I - 1) * 10 + J) + Arr((I + 1) * 10 + J) + Arr((I - 1) * 10 + J - 1) + Arr((I + 1) * 10 + J - 1) + Arr((I * 10) + J - 1) + Arr((I - 1) * 10 + J + 1) + Arr((I + 1) * 10 + J + 1) + Arr((I * 10) + J + 1)
If valCnt = 3 Or valCnt = 4 Then
Cells(I + 1, J + 1) = 1
Arr(10 * I + J) = 1
Else
Arr(10 * I + J) = 0
'Cells(I + 1, J + 1) = 0
End If
End If
Next J
Next I
End Sub
(参考)数学用語の英語表現
例：
互いに素: disjoint
因数分解: factorize
エラトステネスの篩：Eratosthenes' sieve
顔検出の原理
d.hatena.ne.jp
以下ポイントの引用
「・Integral-ImageによるHaar-like検出器の高速演算
・AdaBoostによる検出能力の強化
・多段フィルタ（cascade）による非顔領域の高速排除」
Gmailのアドレスに含まれる"."は無視される
Gmailの別名アドレス（エイリアスアドレス）について調べたことを説明します。
ひとつはgmailのアドレスは、toricor@gmailのアドレスに対して"."の有無を問わない、というものです。大文字も区別しないようです。
例：tori.cor@gmailやtoricor.@gmailやto.ric..or@gmailがすべてtoricor@gmailのメールボックスに届きます。
ちなみにRFCではローカルパート末尾の"."や連続する".."は禁止されています。
もうひとつは+の活用です。
例:toricor+mailmagazine@gmailはtoricor@gmailのメールボックスに届きます。
@以下は@gmail.comが普通ですが、外国での商標問題から@googlemail.comも有効なようです。
参考資料:
Gmail - Wikipedia
