Tính toán các bội số định giá
Sử dụng các công ty dược phẩm bạn đã xác định ở bài trước (dữ liệu được lưu trong đối tượng pharma), hãy tính P/LTM EPS, P/NTM EPS và P/BVPS cho các công ty so sánh. P là giá thị trường của cổ phiếu, EPS là lợi nhuận trên mỗi cổ phần, và BVPS là giá trị sổ sách vốn chủ sở hữu trên mỗi cổ phần.
Lưu ý rằng, trong thực tế, đôi khi EPS hoặc BVPS không có sẵn từ các cơ sở dữ liệu thường dùng. Vì vậy, bạn cần đảm bảo mã của mình đủ linh hoạt để chỉ tính bội số khi EPS hoặc BVPS là số dương. Nếu EPS hoặc BVPS không dương (tức là nhỏ hơn hoặc bằng 0), mã của bạn phải gán giá trị của bội số đó bằng NA.
Trong bài này, bạn nên dùng đối số ifelse() để gán các giá trị không dương thành NA. Với các giá trị dương, ta có thể tính bội số định giá.
Bài tập này là một phần của khóa học
Định giá cổ phiếu bằng R
Hướng dẫn bài tập
- Tính P/LTM EPS.
- Tính P/NTM EPS.
- Tính P/BVPS.
Bài tập tương tác thực hành trực tiếp
Hãy thử làm bài tập này bằng cách hoàn thành đoạn mã mẫu này.
# 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