একটি ম্যাট্রিক্স সহ আর
one two three four
[1,] 1 6 11 16
[2,] 2 7 12 17
[3,] 3 8 11 18
[4,] 4 9 11 19
[5,] 5 10 15 20আমি সাবম্যাট্রিক্সটি বের করতে চাই যার সারিগুলির তিনটি কলাম = ১১ রয়েছে have এটি হ'ল:
one two three four
[1,] 1 6 11 16
[3,] 3 8 11 18
[4,] 4 9 11 19আমি লুপ ছাড়াই এটি করতে চাই। আমি আর এ নতুন তাই সম্ভবত এটি খুব সুস্পষ্ট তবে ডকুমেন্টেশন প্রায়শই কিছুটা ক্ষুদ্র হয়।
উত্তর:
আপনি as.data.frame () ব্যবহার করে যদি নিজের ম্যাট্রিক্সকে একটি ডেটা ফ্রেমে রূপান্তর করেন তবে এটি করা সহজ। সেক্ষেত্রে পূর্ববর্তী উত্তরগুলি (উপসেট বা এম $ তিন ব্যবহার করে) কাজ করবে, অন্যথায় তারা তা করবে না।
ম্যাট্রিক্সে ক্রিয়াকলাপটি সম্পাদনের জন্য , আপনি নাম দিয়ে একটি কলাম সংজ্ঞায়িত করতে পারেন:
m[m[, "three"] == 11,]অথবা সংখ্যা অনুসারে:
m[m[,3] == 11,]মনে রাখবেন যে যদি কেবল একটি সারিতে মেলে, ফলাফলটি কোনও ম্যাট্রিক্স নয়, একটি পূর্ণসংখ্যার ভেক্টর।
m[m[,3] == 11,,drop=FALSE]
df <- df[!which(df$ARID3A:df$YY1 == "U"),](: YY1 ARID3A) মান রয়েছে, এখানে আমি আমার df প্রয়োগ যেখানে কলাম একটি সীমার থেকে যারা সারি সরাতে চান ইউ ।
m <- matrix(1:20, ncol = 4)
colnames(m) <- letters[1:4]নিম্নলিখিত কমান্ডটি উপরের ম্যাট্রিক্সের প্রথম সারিটি নির্বাচন করবে।
subset(m, m[,4] == 16)এবং এটি শেষ তিনটি নির্বাচন করবে।
subset(m, m[,4] > 17)ফলাফল উভয় ক্ষেত্রেই একটি ম্যাট্রিক্স হবে। আপনি যদি কলামগুলি নির্বাচন করতে কলামের নামগুলি ব্যবহার করতে চান তবে আপনি এটির সাথে ডেটাফ্রেমে রূপান্তর বন্ধ করবেন
mf <- data.frame(m)তারপরে আপনি নির্বাচন করতে পারেন
mf[ mf$a == 16, ]অথবা, আপনি সাবসেট কমান্ড ব্যবহার করতে পারেন।
আমি dplyr প্যাকেজ ব্যবহার করে একটি সহজ পদ্ধতির চয়ন করব।
যদি ডেটাফ্রেম ডেটা হয়।
library(dplyr)
result <- filter(data, three == 11)সাবসেট একটি খুব ধীর ফাংশন, এবং আমি ব্যক্তিগতভাবে এটি অকেজো বলে মনে করি।
আমি তোমাকে একটা data.frame, এরে, ম্যাট্রিক্স বলা আছে অনুমান Matসঙ্গে A, B, Cকলাম নামে হিসেবে; তাহলে আপনাকে যা করতে হবে তা হ'ল:
এক কলামে একটি শর্তের ক্ষেত্রে, কলাম কলাম বলতে দিন
Mat[which(Mat[,'A'] == 10), ]বিভিন্ন কলামে একাধিক শর্তের ক্ষেত্রে, আপনি একটি ডামি ভেরিয়েবল তৈরি করতে পারেন। অবস্থার ধরুন হয় A = 10, B = 5এবং C > 2তারপর আমরা আছে:
aux = which(Mat[,'A'] == 10)
aux = aux[which(Mat[aux,'B'] == 5)]
aux = aux[which(Mat[aux,'C'] > 2)]
Mat[aux, ]এর সাথে গতি সুবিধাটি পরীক্ষা করে system.time, whichপদ্ধতিটি subsetপদ্ধতির চেয়ে 10x দ্রুত ।
যদি আপনার ম্যাট্রিক্স বলা হয় m, কেবল ব্যবহার করুন:
R> m[m$three == 11, ]df <- df[!which(df$ARID3A:df$YY1 == "U"),], এখানে আমি আমার df প্রয়োগ থেকে যারা সারি সরাতে চান যেখানে কলাম (ARID3A: YY1) একটি সীমার মান রয়েছেU
যদি ডেটাসেটকে ডেটা বলা হয়, তবে সমস্ত সারি এমন এক শর্ত পূরণ করে যেখানে কলাম 'pm2.5'> 300 এর মান প্রাপ্ত হতে পারে -
ডেটা [ডেটা ['pm2.5']> 300,]
[ ]উত্তরের মধ্যে কোডগুলি চালান এবং আপনি এটি আরও স্পষ্ট দেখতে পাবেন।