Dplyr এ "পুনঃনামকরণ" এর জন্য প্রতিস্থাপন


118

আমি প্লাইয়ের নাম পরিবর্তনকরণ ফাংশন পছন্দ করি rename। আমি সম্প্রতি dplyr ব্যবহার শুরু করেছি, এবং ভাবছিলাম যে dplyr থেকে কোনও ফাংশন ব্যবহার করে ভেরিয়েবলগুলির নামকরণের কোনও সহজ উপায় আছে, এটি প্লাইয়ারের মতো ব্যবহার করা যেমন সহজ rename?

উত্তর:


148

dplyr সংস্করণ 0.3 একটি নতুন rename()ফাংশন যুক্ত করেছে যা ঠিক তেমন কাজ করে plyr::rename()

df <- rename(df, new_name = old_name)

7
আপনি সিনট্যাক্স ব্যাখ্যা করতে পারেন? এটি কমান্ডের চেয়ে গুরুত্বপূর্ণ। আমি ব্যবহার করছি rename(TheDataFrame,OldVarName=NewVarName)কিন্তু আমি পেয়েছি Error: Unknown variables: NewVarName.এবং কেন বুঝতে পারছি না।
s_a

2
@ এস_এ আমি স্পষ্টতা যোগ করেছি। এটি পর্যালোচনা পরে দেখা উচিত।
রায়ান

4
আপনার যদি সমস্যা থাকে তবে প্যাকেজটি স্পষ্টভাবে উল্লেখ করা স্পষ্টভাবে সহায়তা করে dplyr::rename(iris, petal_length = Petal.Length)
বোর্ন

2
দুটি দ্রুত পর্যবেক্ষণ: উপরোক্ত কমান্ডটি কার্যকর করার জন্য ডেটাফ্রেমে বরাদ্দ করতে হবে iris <- dplyr::rename(iris, petal_length = Petal.Length)এবং নাম পরিবর্তন করতে হবে () স্পেসগুলির সাথে পরিবর্তনশীল নামগুলি পরিচালনা করে না, উদাহরণস্বরূপ, dplyr::rename(iris, petal_length = "petal length")একটি ত্রুটি তৈরি করে।
অ্যান্টনি সাইমন মেলিনিকজুক

2
আপনি setNames()কলামের নামগুলি df %>% mutate(foo = 1 +2) %>% setNames(c("blah", "blu", "bar"))
পাইকারিের

46

Dplyr এর পরবর্তী সংস্করণটি নির্বাচনের একটি উন্নত সংস্করণকে সমর্থন করবে যা নামকরণও অন্তর্ভুক্ত করে:

> mtcars2 <- select( mtcars, disp2 = disp )
> head( mtcars2 )
                  disp2
Mazda RX4         160
Mazda RX4 Wag     160
Datsun 710        108
Hornet 4 Drive    258
Hornet Sportabout 360
Valiant           225
> changes( mtcars, mtcars2 )
Changed variables:
      old         new
disp  0x105500400
disp2             0x105500400

Changed attributes:
      old         new
names 0x106d2cf50 0x106d28a98

2
এফওয়াইআই changesরফতানি করা হয় (বা এটি হওয়া উচিত)
হ্যাডলি

2
খুশী হলাম। শুধু জিনিস এই ব্যবহারকারীর পক্ষ থেকে চিন্তাধারায় একটি স্থানান্তর মানে হবে, যেহেতু হয় plyrএর পুনঃনামকরণ ফাংশন ব্যবহার "old"="new"যেহেতু dplyrব্যবহারসমূহ new=oldনেই যার ফলে এটি dplyr ফাংশন বাকি সঙ্গে সামঞ্জস্যপূর্ণ রাখা। ব্যক্তিগতভাবে, আমি এটিকে সমস্যা হিসাবে ভাবি না - আপনি দ্রুত নতুন জিনিসগুলিতে অভ্যস্ত হয়ে যান বিশেষত যখন এটি আপনার ডেটা প্রসেসিংয়ে একটি উল্লেখযোগ্য গতিসম্পন্ন হয়।
ভার্জিলকডব

3
এটি উদ্দেশ্যমূলক বৈশিষ্ট্য, তাই ক্রিয়া পছন্দ select। নিশ্চিত না যে আমাদের কাছে এমন কিছু আছে যা বলছে সমস্ত ভেরিয়েবল নির্বাচন করুন এবং উপায় দ্বারা এই কলামটির নাম পরিবর্তন করুন।
রোমেন ফ্রাঙ্কোইস

1
বিভ্রান্তি এড়াতে আপনি কি নিজের পোস্টটি সম্পাদনা করতে পারবেন যাতে কোডটি selectবাস্তবে যেভাবে আচরণ করে তার প্রতিফলন ঘটে? আমি dplyrসমস্ত ভেরিয়েবলগুলি রাখার সহজ উপায়ের জন্য একটি ভোট দিতে চাই এবং কেবল একটি বা দু'জনের নাম পরিবর্তন করব। :) আপাতত আমি লোড করা plyrএবং ব্যবহার চালিয়ে যাব rename
ভার্জিল্কউ

2
@ রোমেনফ্রানকোইস @aaronwolen আপনি ওপি ব্যবহার করে যা অর্জন করতে পারেন তা অর্জন করতে পারেন mtcars %>% select(matches(".*"),disp2=disp)। আমি আরও পার্সামোনিয়াস সমাধানটি পছন্দ করব তবে এটি কাজ করে এবং সমস্ত কলাম সংরক্ষণ করে (যদিও তাদের ক্রম নয়)। dispসদৃশ হয় না।
farnsy

27

আপনি আসলে চেইনের অংশ হিসাবে plyrএর renameকার্যকারিতাটি ব্যবহার করতে পারেন dplyr। আমি মনে করি যে ক) প্রতিটি ফাংশন data.frameপ্রথম আর্গুমেন্ট হিসাবে গ্রহণ করে এবং খ) data.frameশৃঙ্খলার জন্য একটি কাজ প্রদান করে। এখানে একটি উদাহরণ:

library('plyr')
library('dplyr')

DF = data.frame(var=1:5)

DF %>%
    # `rename` from `plyr`
    rename(c('var'='x')) %>%
    # `mutate` from `dplyr` (note order in which libraries are loaded)
    mutate(x.sq=x^2)

#   x x.sq
# 1 1    1
# 2 2    4
# 3 3    9
# 4 4   16
# 5 5   25

আপডেট:dplyr সমর্থনের বর্তমান সংস্করণটি selectফাংশনের অংশ হিসাবে সরাসরি নাম পরিবর্তনের জন্য (উপরে রোমেন ফ্রাঙ্কোইস পোস্টটি দেখুন)। dplyrচেইনের অংশ হিসাবে নন-ডিপ্লাইয়ার ফাংশন ব্যবহার সম্পর্কে সাধারণ বিবৃতিটি এখনও কার্যকর এবং renameএটি একটি আকর্ষণীয় উদাহরণ।


5
এক্ষেত্রে প্লাইয়ের পরে dplyr লোড করা ভাল । যেভাবে পাওয়া যায় তখন দ্রুত dplyr ফাংশন ব্যবহার করা হয় এবং আপনি dplyr এর পরিবর্তে মিউটেট ব্যবহার করতে পারেন :: মিউটেট
ভিনসেন্ট

দেখে মনে হচ্ছে আপনি শৃঙ্খলায় নন-ডিপ্লাইয়ার ফাংশন ব্যবহার করতে সক্ষম হবেন ঠিকই। এমটিকার%
ভিনসেন্ট

আমি dplyr এবং প্লাইয়ের লোডিং ক্রম পরিবর্তন করেছি, ধন্যবাদ।
ব্যবহারকারী2503795

এটি একটি শালীন কাজ, যদিও বৃহত্তর ডেটাতে পারফরম্যান্স সম্পর্কে একটি আকর্ষণীয় আলোচনা নিয়ে আসে, যা ডিসপ্লায়ারের অন্যতম প্রধান সুবিধা। পরামর্শের জন্য ধন্যবাদ!
ভার্জিল্কউ

ডেটা.টেল প্যাকেজ থেকে সেট-নেমগুলির মতো রেফারেন্স দিয়ে কাজটির নাম পরিবর্তন করে
মাইস্কিজোবাডি

9

এটি dplyr (এখনও) তে কোনও ফাংশন হিসাবে তালিকাভুক্ত নয়: http://cran.rstudio.org/web/packages/dplyr/dplyr.pdf

নীচের ফাংশনটি প্রায় (প্রায়) একই কাজ করে যদি আপনি প্লেয়ার এবং ডিপি্লায়ার উভয়ই লোড করতে না চান

rename <- function(dat, oldnames, newnames) {
  datnames <- colnames(dat)
  datnames[which(datnames %in% oldnames)] <- newnames
  colnames(dat) <- datnames
  dat
}

dat <- rename(mtcars,c("mpg","cyl"), c("mympg","mycyl"))
head(dat)

                  mympg mycyl disp  hp drat    wt  qsec vs am gear carb
Mazda RX4          21.0     6  160 110 3.90 2.620 16.46  0  1    4    4
Mazda RX4 Wag      21.0     6  160 110 3.90 2.875 17.02  0  1    4    4
Datsun 710         22.8     4  108  93 3.85 2.320 18.61  1  1    4    1
Hornet 4 Drive     21.4     6  258 110 3.08 3.215 19.44  1  0    3    1
Hornet Sportabout  18.7     8  360 175 3.15 3.440 17.02  0  0    3    2
Valiant            18.1     6  225 105 2.76 3.460 20.22  1  0    3    1

সম্পাদনা করুন: রোমেনের মন্তব্য নীচের উত্পাদন করে (পরিবর্তন ফাংশনটি dplyr প্রয়োজন। নোট করুন। 1.1)

> dplyr:::changes(mtcars, dat)
Changed variables:
          old         new        
disp      0x108b4b0e0 0x108b4e370
hp        0x108b4b210 0x108b4e4a0
drat      0x108b4b340 0x108b4e5d0
wt        0x108b4b470 0x108b4e700
qsec      0x108b4b5a0 0x108b4e830
vs        0x108b4b6d0 0x108b4e960
am        0x108b4b800 0x108b4ea90
gear      0x108b4b930 0x108b4ebc0
carb      0x108b4ba60 0x108b4ecf0
mpg       0x1033ee7c0            
cyl       0x10331d3d0            
mympg                 0x108b4e110
mycyl                 0x108b4e240

Changed attributes:
          old         new        
names     0x10c100558 0x10c2ea3f0
row.names 0x108b4bb90 0x108b4ee20
class     0x103bd8988 0x103bd8f58

3
এখানে কেবল সমস্যাটি হ'ল ডেটা অনুলিপি করা হয়েছে। এটি খেলতে যেমন, mtcarsইত্যাদি ইত্যাদির জন্য কোনও বড় কথা নয় ... তবে যদি আপনি যথেষ্ট পরিমাণে ডেটা ব্যবহার করেন তবে বেশ নাটকীয়। চেক করুনdplyr:::changes(mtcars, dat)
রোমেন ফ্রাঙ্কোইস

1
রোমেন মন্তব্যের জন্য ধন্যবাদ। Dplyr থেকে পরিবর্তনগুলি রফতানি করার কোনও কারণ নেই? বেশ কার্যকর কাজ মনে হচ্ছে।
ভিনসেন্ট

1
আমার ধারণা হ্যাডলি বেশিরভাগ ক্ষেত্রে এটি আমাদের জন্য বিকাশের সরঞ্জাম হিসাবে দেখে।
রোমেন ফ্রাঙ্কোইস

1
এটি অবশ্যই রফতানি করা উচিত। আমি সম্ভবত ভুলে গিয়েছি
হ্যাডলি

2

ঠিক পুনরায় নামকরণ না করার সময় dplyr::select_all()কলামের নাম পুনরায় ফর্ম্যাট করতে ব্যবহার করা যেতে পারে। এই উদাহরণটি স্পেস এবং পিরিয়ডগুলিকে একটি আন্ডারস্কোর দিয়ে প্রতিস্থাপন করে এবং সবকিছুকে নিম্নতর ক্ষেত্রে রূপান্তর করে:

iris %>%  
  select_all(~gsub("\\s+|\\.", "_", .)) %>% 
  select_all(tolower) %>% 
  head(2)
  sepal_length sepal_width petal_length petal_width species
1          5.1         3.5          1.4         0.2  setosa
2          4.9         3.0          1.4         0.2  setosa

1

আমি dplyr :: নতুন নাম ব্যবহার করার চেষ্টা করেছি এবং আমি একটি ত্রুটি পেয়েছি:

occ_5d <- dplyr::rename(occ_5d, rowname='code_5d')
Error: Unknown column `code_5d` 
Call `rlang::last_error()` to see a backtrace

আমি পরিবর্তে বেস আর ফাংশনটি ব্যবহার করেছি যা বেশ সহজ এবং কার্যকর হিসাবে দেখা যাচ্ছে:

names(occ_5d)[1] = "code_5d"
আমাদের সাইট ব্যবহার করে, আপনি স্বীকার করেছেন যে আপনি আমাদের কুকি নীতি এবং গোপনীয়তা নীতিটি পড়েছেন এবং বুঝতে পেরেছেন ।
Licensed under cc by-sa 3.0 with attribution required.