a<b
ΦX1,...,XNμσ2†a<b
Xi=μ+σ⋅Φ−1(Ui)U1,...,UN∼IID U[Φ(a−μσ),Φ(b−μσ)].
কাটা কাটা বিতরণ থেকে উত্পন্ন মানগুলির জন্য কোনও ইনবিল্ট ফাংশন নেই, তবে এলোমেলো ভেরিয়েবল উত্পন্ন করার জন্য সাধারণ ফাংশনগুলি ব্যবহার করে এই পদ্ধতিটি প্রোগ্রাম করা তুচ্ছ। এখানে একটি সাধারণ Rফাংশন rtruncnormযা কোডের কয়েকটি লাইনে এই পদ্ধতিটি প্রয়োগ করে।
rtruncnorm <- function(N, mean = 0, sd = 1, a = -Inf, b = Inf) {
if (a > b) stop('Error: Truncation range is empty');
U <- runif(N, pnorm(a, mean, sd), pnorm(b, mean, sd));
qnorm(U, mean, sd); }
এটি একটি ভেক্টরাইজড ফাংশন যা Nকাটা কাটা সাধারণ বিতরণ থেকে আইআইডি র্যান্ডম ভেরিয়েবল তৈরি করবে । একই পদ্ধতিতে অন্যান্য কাটা বিতরণের জন্য প্রোগ্রাম ফাংশন করা সহজ হবে। কাটা কাটা বিতরণের জন্য সম্পর্কিত ঘনত্ব এবং কোয়ান্টাইল ফাংশনগুলি প্রোগ্রাম করাও খুব কঠিন হবে না।
†μσ2