计算估值倍数
使用您在上一个练习中识别的制药公司（其数据保存在 pharma 数据对象中），计算可比公司的 P/LTM EPS、P/NTM EPS 和 P/BVPS。P 为股票的市场价格，EPS 为每股收益，BVPS 为每股账面权益价值。
请注意，在实际应用中，常用数据库有时不会提供 EPS 或 BVPS。因此，您需要确保代码足够灵活：仅当 EPS 或 BVPS 为正时才计算倍数。如果 EPS 或 BVPS 非正（即小于或等于 0），代码应将相应倍数的值设为 NA。
在本练习中，请使用 ifelse() 将非正值设为 NA。对于正值，再计算相应的估值倍数。
本练习是课程的一部分
用 R 进行股权估值
练习说明
- 计算 P/LTM EPS。
- 计算 P/NTM EPS。
- 计算 P/BVPS。
交互式实操练习
通过完成这段示例代码来试试这个练习。
# 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