كيفية التحقق من وجود الملف في r (مع أمثلة)

يمكنك استخدام بناء الجملة الأساسي التالي للتحقق من وجود ملف في دليل العمل الحالي الخاص بك في R:

 file. exists (' my_data.csv ')

ستعيد هذه الدالة TRUE إذا كان الملف موجودًا أو FALSE إذا لم يكن موجودًا.

يمكنك أيضًا استخدام عبارة if else لقراءة ملف في R فقط إذا كان موجودًا:

 data <- ' my_data.csv '

if(file. exists (data)){
df <- read. csv (data)
} else {
print (' Does not exist ')
}

يوضح المثال التالي كيفية استخدام هذه الوظائف عمليًا.

مثال: التحقق من وجود الملف في R

لنفترض أن دليل العمل الحالي الخاص بي في R هو مجلد يسمى test_data ويحتوي على ثلاثة ملفات CSV:

يمكنني استخدام list.files() لسرد أسماء كل ملف في دليل العمل:

 #display the names of every file in current working directory
list. files ()
[1] "my_data.csv" "my_new_data.csv" "some_old_data.csv"

يمكنني استخدام file.exists() للتحقق من وجود ملف معين في دليل العمل الحالي:

 #check if file 'my_data.csv' exists in current working directory
file. exists (' my_data.csv ')

[1] TRUE

تقوم الدالة بإرجاع TRUE ، الذي يخبرنا أن الملف ‘my_data.csv’ موجود بالفعل في دليل العمل الحالي.

يمكننا بعد ذلك استخدام عبارة if else التالية لاستيراد ملف فقط إذا كان موجودًا:

 #define file name
data <- ' my_data.csv '

#import file only if it exists
if(file. exists (data)){
df <- read. csv (data)
} else {
print (' Does not exist ')
}

#view contents of CSV file
df

  team points assists
1 to 14 4
2 B 26 7
3 C 29 8
4 D 20 3

وبما أن الملف موجود، يمكننا استيراده بنجاح.

ومع ذلك، لنفترض أننا نحاول استيراد ملف غير موجود:

 #define file name
data <- ' this_data.csv '

#import file only if it exists
if(file. exists (data)){
df <- read. csv (data)
} else {
print (' Does not exist ')
}

[1] “Does not exist”

نتلقى رسالة “غير موجود”، والتي تخبرنا أن الملف المسمى this_data.csv غير موجود في دليل العمل الحالي.

مصادر إضافية

تشرح البرامج التعليمية التالية كيفية استخدام الوظائف الشائعة الأخرى في R:

كيفية قراءة الملفات المضغوطة في R
كيفية استيراد ملفات CSV إلى R
كيفية استيراد ملفات Excel إلى R
كيفية إعادة تسمية الملفات في R