কোয়ান্টাইলগুলির জন্য ফর্ম এক্সপ্রেশন বন্ধ রয়েছে


16

আমার দুটি এলোমেলো ভেরিয়েবল রয়েছে, যেখানে হয় 0-1 বন্টন uniformαiiid U(0,1),i=1,2U(0,1)

তারপরে, এগুলি একটি প্রক্রিয়া দেয়, বলুন:

পি(এক্স)=α1পাপ(এক্স)+ +α2কোসাইন্(এক্স),এক্স(0,2π)

এখন, আমি ভাবছিলাম যে ) জন্য প্রদত্ত x \ ইন (0,2 \ পাই) এর তাত্ত্বিক 75 শতাংশ কোয়ান্টিলিটি পি (এক্স) এর কোনও বন্ধ ফর্ম এক্সপ্রেশন রয়েছে কিনা? - আমি মনে করি আমি এটি কম্পিউটার এবং পি (এক্স) এর অনেক উপলব্ধি দিয়ে করতে পারি তবে আমি বন্ধ ফর্মটি পছন্দ করি -পি ( এক্স ) x ( 0 , 2 π ) পি ( এক্স )F1(P(x);0.75)P(x)x(0,2π)P(x)


1
আমার মনে হয় আপনি অনুমান করা α চান 1 এবং α 2 পরিসংখ্যানগত স্বাধীন।
মাইকেল আর চেরনিক

@ প্রিলিটিনেটর: আপনি কি উত্তর হিসাবে এটি লিখতে পারেন?
ব্যবহারকারী 603

4
(+1) "প্রক্রিয়া" দৃষ্টিকোণটি এখানে কিছুটা লাল রঙের হেরিং মনে হচ্ছে। লিখন যেখানে । তারপরে, প্রতিটি নির্দিষ্ট , প্রথম দুটি পদ একটি ট্র্যাপিজয়েডাল ঘনত্বের ক্রিয়া নির্ধারণ করে এবং শেষ শব্দটি কেবল একটি গড় অফসেট। ট্র্যাপিজয়েডাল ঘনত্ব নির্ধারণের জন্য, আমাদের কেবলমাত্র consider বিবেচনা করা উচিত ।
P(x)=β1sinx+β2cosx+12(sinx+cosx),
βi=αi1/2U(1/2,1/2)xx[0,π/2)
কার্ডিনাল

2
সংখ্যাগতভাবে এটি ব্যবহার করে quant = function(n,p,x) return( quantile(runif(n)*sin(x)+runif(n)*cos(x),p) )এবং সহজেই করা যায় quant(100000,0.75,1)

উত্তর:


19

এই সমস্যাটি দ্রুত ট্র্যাপিজয়েডাল বিতরণের পরিমাণ নির্ধারণের একটিকে হ্রাস করা যেতে পারে ।

আসুন আমরা পি ( এক্স ) = ইউ 11 হিসাবে প্রক্রিয়াটি আবার লিখি যেখানে ইউ 1 এবং ইউ 2 আইআইড ইউ ( - 1 , 1 ) এলোমেলো পরিবর্তনশীল; এবং, প্রতিসম দ্বারা,এটি প্রক্রিয়া হিসাবেএকইপ্রান্তিকবিতরণ আছে ¯ P ( x ) = U 1| 1

P(x)=U112sinx+U212cosx+12(sinx+cosx),
U1U2U(1,1) প্রথম দুটি পদ একটি প্রতিসমট্র্যাপিজয়েডাল ঘনত্বনির্ধারণ করেযেহেতু এটি দুটি গড়-শূন্য ইউনিফর্ম র্যান্ডম ভেরিয়েবলের যোগফল (সাধারণভাবে, বিভিন্ন অর্ধ-প্রস্থের সাথে)। শেষ শব্দটি কেবল এই ঘনত্বের অনুবাদে ফলাফল করে এবং কোয়ান্টাইলটি এই অনুবাদটির সাথে সমান হয় (অর্থাত্, স্থানান্তরিত বিতরণের পরিমাণটি কেন্দ্রিক বিতরণের স্থানান্তরিত কোয়ান্টাইল)।
P¯(x)=U1|12sinx|+U2|12cosx|+12(sinx+cosx).

ট্র্যাপিজয়েডাল বিতরণের পরিমাণ

যাক যেখানে এক্স 1 এবং এক্স 2 স্বাধীন ইউ ( - একটি , একটি ) এবং ইউ ( - , ) ডিস্ট্রিবিউশন। সাধারণতার ক্ষতি ছাড়াই ধরে নিন যে a b । তারপর, ঘনত্ব ওয়াই এর ঘনত্ব convolving দ্বারা গঠিত এক্স 1 এবং এক্স 2 । এটি সহজেই শীর্ষে ( - ক) দিয়ে ট্র্যাপিজয়েড হিসাবে দেখা যায়Y=X1+X2X1X2U(a,a)U(b,b)abYX1X2 , ( - একটি + + , 1 / 2 একটি ) , ( একটি - বো , 1 / 2 একটি ) এবং ( একটি + + , 0 )(ab,0)(a+b,1/2a)(ab,1/2a)(a+b,0)

বিতরণের সমাংশক কোন জন্য পি < 1 / 2 এইভাবে হয়, কুই ( পি ) : = Q ( পিYp<1/2 প্রতিসাম্য দ্বারা, জন্যপি>1/2, আমরাকুই(পি)=-কুই(1-পি)

q(p):=q(p;a,b)={8abp(a+b),p<b/2a(2p1)a,b/2ap1/2.
p>1/2q(p)=q(1p)

কেস হাতে ফিরে

উপরেরগুলি ইতিমধ্যে একটি বন্ধ-ফর্ম এক্সপ্রেশন দিতে যথেষ্ট সরবরাহ করে। আমাদের যা দরকার দুটি মামলা মধ্যে বিরতি হয় এবং | sin x | < | cos x | নির্ধারণ যার ভূমিকা পালন করে 2 একটি এবং যার ভূমিকা পালন করে 2 উপরে। (এখানে 2 এর গুণকটি ¯ পি ( এক্স ) এর সংজ্ঞায় কেবল দুটি দ্বারা বিভাগগুলির জন্য ক্ষতিপূরণ দেওয়া ) )|sinx||cosx||sinx|<|cosx|2a2bP¯(x)

জন্য , উপর | sin x | | cos x | আমরা সেট একটি = | sin x | / 2 এবং = | cos x | / 2 এবং কিউ x ( পি ) = কিউ ( পি।) পানp<1/2|sinx||cosx|a=|sinx|/2b=|cosx|/2 এবং অন | sin x | < | cos x | ভূমিকা বিপরীত। একইভাবে, জন্য পি 1 / 2 কুই এক্স ( পি ) = - কুই ( 1 - পি

qx(p)=q(p;a,b)+12(sinx+cosx),
|sinx|<|cosx|p1/2
qx(p)=q(1p;a,b)+12(sinx+cosx),

কোয়ান্টাইলস

P(x)x02πypP(x)

এক্স এর ক্রিয়া হিসাবে কোয়ান্টাইলস tiles

p=1/2p=0p=1p=1/4p=3/4

কোয়ান্টাইল প্লট

কিছু নমুনা Rকোড

qprocP(x)xqtrap

# Pointwise quantiles of a random process: 
# P(x) = a_1 sin(x) + a_2 cos(x)

# Trapezoidal distribution quantile
# Assumes X = U + V where U~Uni(-a,a), V~Uni(-b,b) and a >= b
qtrap <- function(p, a, b)
{
    if( a < b) stop("I need a >= b.")
    s <- 2*(p<=1/2) - 1
    p <- ifelse(p<= 1/2, p, 1-p)
    s * ifelse( p < b/2/a, sqrt(8*a*b*p)-a-b, (2*p-1)*a )
}

# Now, here is the process's quantile function.
qproc <- function(p, x)
{
    s <- abs(sin(x))
    c <- abs(cos(x))
    a <- ifelse(s>c, s, c)
    b <- ifelse(s<c, s, c)
    qtrap(p,a/2, b/2) + 0.5*(sin(x)+cos(x))
} 

নীচে সম্পর্কিত আউটপুট সহ একটি পরীক্ষা করা হয়।

# Test case
set.seed(17)
n <- 1e4
x <- -pi/8
r <- runif(n) * sin(x) + runif(n) * cos(x)

# Sample quantiles, then actual.
> round(quantile(r,(0:10)/10),3)
    0%    10%    20%    30%    40%    50%    60%    70%    80%    90%   100%
-0.380 -0.111 -0.002  0.093  0.186  0.275  0.365  0.453  0.550  0.659  0.917
> round(qproc((0:10)/10, x),3)
 [1] -0.383 -0.117 -0.007  0.086  0.178  0.271  0.363  0.455  0.548
[10]  0.658  0.924

3
আমি আশা করি আমি আরও upvote করতে পারে। এই হল বিশেষজ্ঞতা শক্তি: REASON আমি এই ওয়েবসাইট ভালোবাসি। আমি ট্র্যাপিজয়েড বিতরণ সম্পর্কে জানতাম না। এটি বের করতে আমার কিছুটা সময় লাগত। অথবা ইউনিফর্মগুলির পরিবর্তে গাউসিয়ানদের ব্যবহারের জন্য আমাকে নিষ্পত্তি করতে হবে। যাইহোক, এটা দুর্দান্ত।
ব্যবহারকারী 60
আমাদের সাইট ব্যবহার করে, আপনি স্বীকার করেছেন যে আপনি আমাদের কুকি নীতি এবং গোপনীয়তা নীতিটি পড়েছেন এবং বুঝতে পেরেছেন ।
Licensed under cc by-sa 3.0 with attribution required.