■

#積算基底面積の計算。　んー、楽勝でしたね。わざわざforループや条件判定を書いたりする必要がありませんでした。
#これで手軽に計算ができると思います。以前自分が書いたRのコードは時間がやたらかかりすぎた。
#先にデータフレームｘの列名をアタッチしてから利用する
Cd(x[1,1])=sum(x[列名>x[1,1],1])