kozenumezawa / interpolatecalculator

InterpolateCalculator(uncompleted)

Calculate interpolation of arbitrary points from volume data.

Data

Test data is available for download from the following URL. https://www.dropbox.com/sh/5grs6f47u1axk16/AAAFs3YfuZ4f15cXTaC2_PGAa?dl=0

interpolatecalculator's Issues

プリズム格子の底面と上面の面積の検証

Rでの検証
外積を用いて底面と上面の三角形の面積を求めた。

> v0 <- c(14.16206645965576, 17.28990364074707, 0.13279689848423)
> v1 <- c(14.02629089355469, 17.40073776245117, 0.00000000000000)
> v2 <- c(14.18108654022217, 17.27481651306152, 0.00000000000000)
> v3 <- c(14.16836071014404, 17.29757499694824, 0.13285292685032)
> v4 <- c(14.03252315521240, 17.40846061706543, 0.00000770520091)
> v5 <- c(14.18738746643066, 17.28248786926270, -0.00000669671681)
> 
> a1 <- v1 - v0
> a2 <- v2 - v0
> 
> b1 <- v4 - v3
> b2 <- v5 - v3
> 
> S0 <- norm(a1 %o% a2) / 2
> S1 <- norm(b1 %o% b2) / 2
> S0
[1] 0.02519201
> S1
[1] 0.02521466

※計算途中のv0,v1,..v5の値が結構丸められている模様
例えば、v5を出力すると次のようになる

v5
[1] 1.418739e+01 1.728249e+01 -6.696717e-06