Menghitung Kelipatan Valuasi
Dengan menggunakan perusahaan farmasi yang telah Anda identifikasi pada latihan sebelumnya (datanya tersimpan dalam objek data pharma), hitung P/LTM EPS, P/NTM EPS, dan P/BVPS untuk perusahaan pembanding. P adalah harga pasar saham, EPS adalah laba per saham, dan BVPS adalah nilai buku ekuitas per saham.
Perhatikan bahwa, dalam praktik, ada kalanya EPS atau BVPS tidak tersedia dari basis data yang umum digunakan. Oleh karena itu, Anda harus memastikan kode Anda cukup fleksibel untuk hanya menghitung kelipatan saat EPS atau BVPS bernilai positif. Jika EPS atau BVPS tidak positif (yaitu kurang dari atau sama dengan 0), kode Anda harus menetapkan nilai kelipatan tersebut sama dengan NA.
Untuk latihan ini, Anda harus menggunakan argumen ifelse() untuk mengatur nilai yang tidak positif sama dengan NA. Jika nilainya positif, barulah kita menghitung kelipatan valuasi.
Latihan ini adalah bagian dari kursus
Penilaian Ekuitas di R
Petunjuk latihan
- Hitung P/LTM EPS.
- Hitung P/NTM EPS.
- Hitung P/BVPS.
Latihan interaktif praktis
Cobalah latihan ini dengan menyelesaikan kode contoh berikut.
# Calculate P/LTM EPS
pharma$ltm_p_e <- ifelse(___, ___, ___)
# Calculate P/NTM EPS
pharma$ntm_p_e <- ifelse(___, ___, ___)
# Calculate P/BVPS
pharma$p_bv <- ifelse(___, ___, ___)
pharma