Tujuan dari tutorial ini adalah untuk membantu anda dalam menganalisis teks Al-Qur’an
Untuk mendapatkan data Al-Qur’an silakan klik Link ini dan pilih file yang sesuai. Pada tutorial kali ini menggunakan tipe “Simple Clean” kemudian menyimpan data pada folder tutorial
Sys.setlocale("LC_ALL", "arabic" )
## [1] "LC_COLLATE=Arabic_Saudi Arabia.1256;LC_CTYPE=Arabic_Saudi Arabia.1256;LC_MONETARY=Arabic_Saudi Arabia.1256;LC_NUMERIC=C;LC_TIME=Arabic_Saudi Arabia.1256"
q = read.csv("data/quran-simple-clean.txt", header=F, stringsAsFactor=F, encoding="UTF-8", sep="|")
head(q)
## V1 V2 V3
## 1 1 1 بسم الله الرحمن الرحيم
## 2 1 2 الحمد لله رب العالمين
## 3 1 3 الرحمن الرحيم
## 4 1 4 مالك يوم الدين
## 5 1 5 إياك نعبد وإياك نستعين
## 6 1 6 اهدنا الصراط المستقيم
tail(q)
## V1 V2 V3
## 6231 114 1 بسم الله الرحمن الرحيم قل أعوذ برب الناس
## 6232 114 2 ملك الناس
## 6233 114 3 إله الناس
## 6234 114 4 من شر الوسواس الخناس
## 6235 114 5 الذي يوسوس في صدور الناس
## 6236 114 6 من الجنة والناس
Menampilkan surat pertama (Al-Fatihah) dan surat terakhir (An-Nas) Pada Al-Qur’an
Struktur Al-Qur’an di R
str(q)
## 'data.frame': 6236 obs. of 3 variables:
## $ V1: int 1 1 1 1 1 1 1 2 2 2 ...
## $ V2: int 1 2 3 4 5 6 7 1 2 3 ...
## $ V3: chr "بسم الله الرحمن الرحيم" "الحمد لله رب العالمين" "الرحمن الرحيم" "مالك يوم الدين" ...
Coba perhatikan pada output sebelumnya pada heading apakah melihat V1, V2, dan V3 ? hal ini dikarenakan kita tidak menamai ketiga heading kolom tersebut. Kita perlu merubah nama kolom menjadi
colnames(q) = c("surat", "ayat", "teks")
Kolom heading sudah dirubah, setelah itu mari kita tampilkan ayat pertama dalam 10 ayat pertama
q$teks[q$ayat==1 & q$surat<=10]
## [1] "بسم الله الرحمن الرحيم"
## [2] "بسم الله الرحمن الرحيم الم"
## [3] "بسم الله الرحمن الرحيم الم"
## [4] "بسم الله الرحمن الرحيم يا أيها الناس اتقوا ربكم الذي خلقكم من نفس واحدة وخلق منها زوجها وبث منهما رجالا كثيرا ونساء <U+06DA> واتقوا الله الذي تساءلون به والأرحام <U+06DA> إن الله كان عليكم رقيبا"
## [5] "بسم الله الرحمن الرحيم يا أيها الذين آمنوا أوفوا بالعقود <U+06DA> أحلت لكم بهيمة الأنعام إلا ما يتلى عليكم غير محلي الصيد وأنتم حرم <U+06D7> إن الله يحكم ما يريد"
## [6] "بسم الله الرحمن الرحيم الحمد لله الذي خلق السماوات والأرض وجعل الظلمات والنور <U+06D6> ثم الذين كفروا بربهم يعدلون"
## [7] "بسم الله الرحمن الرحيم المص"
## [8] "بسم الله الرحمن الرحيم يسألونك عن الأنفال <U+06D6> قل الأنفال لله والرسول <U+06D6> فاتقوا الله وأصلحوا ذات بينكم <U+06D6> وأطيعوا الله ورسوله إن كنتم مؤمنين"
## [9] "براءة من الله ورسوله إلى الذين عاهدتم من المشركين"
## [10] "بسم الله الرحمن الرحيم الر <U+06DA> تلك آيات الكتاب الحكيم"
Kalau anda teliti apakah selalu terlihat lafadz “بسم الله الرحمن الرحيم” ? itu karena orang-orang tanzil memakai pedoman bahwasanya lafadz “بسم الله الرحمن الرحيم” merupakan ayat pertama di semua surat (kecuali surat nomer 9). Bagaimana cara menghapusnya dari semua surat ? berikut caranya:
q$teks = gsub("^بسم الله الرحمن الرحيم ","",q$teks)
Mari lanjutkan tutorial selanjutnya !!!
Mari kita tampilkan surat no. 100
q[q$surat==100,]
## surat ayat teks
## 6147 100 1 والعاديات ضبحا
## 6148 100 2 فالموريات قدحا
## 6149 100 3 فالمغيرات صبحا
## 6150 100 4 فأثرن به نقعا
## 6151 100 5 فوسطن به جمعا
## 6152 100 6 إن الإنسان لربه لكنود
## 6153 100 7 وإنه على ذلك لشهيد
## 6154 100 8 وإنه لحب الخير لشديد
## 6155 100 9 أفلا يعلم إذا بعثر ما في القبور
## 6156 100 10 وحصل ما في الصدور
## 6157 100 11 إن ربهم بهم يومئذ لخبير
Berikut adalah cara untuk melihat bagaimana waktu dan dimana kata-kata Muhammad (محمد) disebutkan dalam Al-Qur’an
q[which(grepl("محمد", q$teks)),]
## surat ayat
## 437 3 144
## 3573 33 40
## 4547 47 2
## 4612 48 29
## teks
## 437 وما محمد إلا رسول قد خلت من قبله الرسل <U+06DA> أفإن مات أو قتل انقلبتم على أعقابكم <U+06DA> ومن ينقلب على عقبيه فلن يضر الله شيئا <U+06D7> وسيجزي الله الشاكرين
## 3573 ما كان محمد أبا أحد من رجالكم ولكن رسول الله وخاتم النبيين <U+06D7> وكان الله بكل شيء عليما
## 4547 والذين آمنوا وعملوا الصالحات وآمنوا بما نزل على محمد وهو الحق من ربهم <U+06D9> كفر عنهم سيئاتهم وأصلح بالهم
## 4612 محمد رسول الله <U+06DA> والذين معه أشداء على الكفار رحماء بينهم <U+06D6> تراهم ركعا سجدا يبتغون فضلا من الله ورضوانا <U+06D6> سيماهم في وجوههم من أثر السجود <U+06DA> ذلك مثلهم في التوراة <U+06DA> ومثلهم في الإنجيل كزرع أخرج شطأه فآزره فاستغلظ فاستوى على سوقه يعجب الزراع ليغيظ بهم الكفار <U+06D7> وعد الله الذين آمنوا وعملوا الصالحات منهم مغفرة وأجرا عظيما
Itulah beberapa tutorial text mining pada Al-Qur’an kita telah membaca data text Al-Qur’an, menampilkan surat, mencari kata tertentu dari Al-Qur’an, selanjutnya bisa dikembangkan lagi lebih dalam.