আমার কাছে নিম্নে ডেটা সেট করার একটি উদাহরণ রয়েছে:
Volume <- seq(1,20,0.1)
var1 <- 100
x2 <- 1000000
x3 <- 30
x4 = sqrt(x2/pi)
H = x3 - Volume
r = (x4*H)/(H + Volume)
Power = (var1*x2)/(100*(pi*Volume/3)*(x4*x4 + x4*r + r*r))
Power <- jitter(Power, factor = 1, amount = 0.1)
plot(Volume,Power)
চিত্র থেকে, এটি প্রস্তাবিত হতে পারে যে 'ভলিউম' এবং 'পাওয়ার' এর একটি নির্দিষ্ট পরিসরের মধ্যে সম্পর্ক লিনিয়ার, তারপরে যখন 'ভলিউম' তুলনামূলকভাবে ছোট হয়ে যায় তখন সম্পর্কটি অ-রৈখিক হয়ে যায়। এটি চিত্রিত করার জন্য কোনও পরিসংখ্যান পরীক্ষা আছে?
ওপির প্রতিক্রিয়াগুলিতে প্রদর্শিত কয়েকটি প্রস্তাবনার প্রতি শ্রদ্ধা সহ:
এখানে দেখানো উদাহরণটি কেবল একটি উদাহরণ, আমি যে ডেটাসেটটি পেয়েছি তা এখানে নোসিয়ার হলেও দেখা সম্পর্কের সাথে সাদৃশ্যপূর্ণ। আমি এখনও অবধি যে বিশ্লেষণ পরিচালনা করেছি তা দেখায় যে আমি যখন একটি নির্দিষ্ট তরলের ভলিউম বিশ্লেষণ করি যখন কম ভলিউম থাকে তখন সিগন্যালের শক্তি তীব্রভাবে বৃদ্ধি পায়। সুতরাং, বলুন যে আমার কেবল পরিবেশ ছিল যেখানে ভলিউম 15 এবং 20 এর মধ্যে ছিল এটি প্রায় লিনিয়ার সম্পর্কের মতো দেখাবে। যাইহোক, পয়েন্টের পরিসীমা বৃদ্ধি করে অর্থাৎ ছোট ভলিউম থাকা, আমরা দেখতে পাচ্ছি যে সম্পর্কটি মোটেই লিনিয়ার নয়। আমি এখন পরিসংখ্যানগতভাবে এটি কীভাবে প্রদর্শন করব সে সম্পর্কে কিছু পরিসংখ্যান সংক্রান্ত পরামর্শ খুঁজছি। আশা করি এটি উপলব্ধিযোগ্য।
Rকোড: plot(s <- by(cbind(Power, Volume), groups <- cut(Volume, 10), function(d) summary(lm(Power ~ Volume, data=d))$sigma), xlab="Volume range", ylab="Residual SD", ylim=c(0, max(s))); abline(h=mean(s), lty=2, col="Blue")। এটি সম্পূর্ণ পরিসীমা জুড়ে একটি অবিচ্ছিন্ন অবশিষ্টাংশ আকার দেখায়।