PenttinenPointProcess[μ,γ,rp,d]
Penttinen点過程を,一定強度 μ,相互作用パラメータ μ,(
における)相互作用半径 rpで表す.
PenttinenPointProcess
PenttinenPointProcess[μ,γ,rp,d]
Penttinen点過程を,一定強度 μ,相互作用パラメータ μ,(
における)相互作用半径 rpで表す.
詳細
- PenttinenPointProcessは,一対面積相互作用過程としても知られている.
- PenttinenPointProcessは,点が半径 rpの点の周りの球の重複の測定において対数線形である対斥力を持ち,そうでなければ均一に分布する点配置をモデル化する.
- Penttinenモデルは,一般に,植物,樹木,動物の巣のように,過程相互作用が半径 rp内の共有リソース量に依存する場合に使用される.
- Penttinen点過程は,強度 μ と(どちらも γ と rpによって以下のようにパラメータ化される)対ポテンシャル ϕ あるいは対相互作用 h についてGibbsPointProcessとして定義できる.
-

対ポテンシャル 
対相互作用 - ここで,
は重複する球の測度値である. -

における重複面積
における重複体積![1-r TemplateBox[{{{d, /, 2}, +, 1}}, Gamma] TemplateBox[{{1, /, 2}, {{(, {1, -, d}, )}, /, 2}, {3, /, 2}, {{(, {r, ^, 2}, )}, /, {(, {4, , {{r, _, p}, ^, 2}}, )}}}, Hypergeometric2F1]/(sqrt(pi) r_p TemplateBox[{{{(, {d, +, 1}, )}, /, 2}}, Gamma]) 1-r TemplateBox[{{{d, /, 2}, +, 1}}, Gamma] TemplateBox[{{1, /, 2}, {{(, {1, -, d}, )}, /, 2}, {3, /, 2}, {{(, {r, ^, 2}, )}, /, {(, {4, , {{r, _, p}, ^, 2}}, )}}}, Hypergeometric2F1]/(sqrt(pi) r_p TemplateBox[{{{(, {d, +, 1}, )}, /, 2}}, Gamma])](Files/PenttinenPointProcess.ja/2.png)
における重複測度値 - 観測領域 reg のPenttinen点過程からの点配置
は,PoissonPointProcess[1,d]について
に比例する
密度関数を持つ. - 点配置
に点
を加えるPapangelou条件付き密度
は
である. - PenttinenPointProcessでは,μ,γ ,rpは
となるような正の数でよく,d は任意の正の整数でよい. - PenttinenPointProcessは,
のときに簡約されてPoissonPointProcessになる.
の値が小さいと
内に点を置くことができない. - StraussPointProcessについて可能なRandomPointConfigurationのMethod設定には以下がある.
-
"MCMC" マルコフ(Markov)連鎖モンテカルロ法による出生死滅過程 "Exact" 過去からのカップリング法 - 次は,EstimatedPointProcessにおけるPenttinenPointProcessについてのPointProcessEstimatorの可能な設定である.
-
Automatic パラメータ推定器を自動選択する "MaximumPseudoLikelihood" 擬似尤度を最大にする - PenttinenPointProcessは,RipleyKやRandomPointConfiguration等の関数と一緒に使うことができる.
例題
すべて開く すべて閉じる例 (2)
proc = PenttinenPointProcess[30, 0.1, 1., 2];reg = Rectangle[{0, 0}, {10, 10}];pts = RandomPointConfiguration[proc, reg]ListPlot[pts]地表で定義されたPenttinen点過程からサンプルを取る:
reg = Entity["Country", "Portugal"];pts = RandomPointConfiguration[PenttinenPointProcess[Quantity[0.01, 1/"Kilometers"^2], 0.3, Quantity[10, "Kilometers"], 2], reg]GeoListPlot[pts]スコープ (2)
pts = RandomPointConfiguration[
PenttinenPointProcess[100, .5, .05, 2], Rectangle[], 2]ListPlot[pts]Clear[μ, γ, rp, d];
EstimatedPointProcess[pts, PenttinenPointProcess[μ, γ, rp, d]]μ = Quantity[.3, "Kilometers" ^ -2];
rp = Quantity[10., "Kilometers"];
γ = .5;proc = PenttinenPointProcess[μ, γ, rp, 2];
reg = GeoDisk[Entity["City", {"Lima", "Lima", "Peru"}], Quantity[30, "Kilometers"]];pts = RandomPointConfiguration[proc, reg, 2]GeoListPlot[pts]Clear[a, b, c, d];
EstimatedPointProcess[pts, PenttinenPointProcess[a, b, c, d]]オプション (3)
Method (3)
proc = PenttinenPointProcess[100, .2, .01, 2];
reg = Disk[];RandomPointConfiguration[proc, reg, Method -> "MCMC"]RandomPointConfiguration[proc, reg, Method -> {"MCMC", MaxRecursion -> 6}]RandomPointConfiguration[proc, reg, Method -> {"MCMC", "LengthOfRun" -> 5 * 10 ^ 4}]proc = PenttinenPointProcess[50, 0.3, .1, 2];
reg = Disk[];RandomPointConfiguration[proc, reg, Method -> {"MCMC", "InitialState" -> RandomPoint[reg, 100]}]proc = PenttinenPointProcess[30, .5, .3, 2];reg = Rectangle[];pts = RandomPointConfiguration[proc, reg, Method -> "Exact"]ListPlot[pts]考えられる問題 (1)
デフォルトで,点の数が定常状態に収束するまで,あるいは反復のデフォルト数に達するまで,シミュレーションが続けられる:
proc = PenttinenPointProcess[10 ^ 3, .2, .01, 2];
reg = Disk[];RandomPointConfiguration[proc, reg]RandomPointConfiguration[proc, reg, Method -> {"MCMC", MaxRecursion -> 6}]RandomPointConfiguration[proc, reg, Method -> {"MCMC", "LengthOfRun" -> 5 * 10 ^ 4}]関連するガイド
-
▪
- 空間点過程
テキスト
Wolfram Research (2020), PenttinenPointProcess, Wolfram言語関数, https://reference.wolfram.com/language/ref/PenttinenPointProcess.html.
CMS
Wolfram Language. 2020. "PenttinenPointProcess." Wolfram Language & System Documentation Center. Wolfram Research. https://reference.wolfram.com/language/ref/PenttinenPointProcess.html.
APA
Wolfram Language. (2020). PenttinenPointProcess. Wolfram Language & System Documentation Center. Retrieved from https://reference.wolfram.com/language/ref/PenttinenPointProcess.html
BibTeX
@misc{reference.wolfram_2026_penttinenpointprocess, author="Wolfram Research", title="{PenttinenPointProcess}", year="2020", howpublished="\url{https://reference.wolfram.com/language/ref/PenttinenPointProcess.html}", note=[Accessed: 04-November-2026]}
BibLaTeX
@online{reference.wolfram_2026_penttinenpointprocess, organization={Wolfram Research}, title={PenttinenPointProcess}, year={2020}, url={https://reference.wolfram.com/language/ref/PenttinenPointProcess.html}, note=[Accessed: 04-November-2026]}