假想某只债券在上海证券交易所交易，其面值为100元，票面利率为4%，每半年支付一次利息，2025年4月11日到期。，并假设在该期间债券的收益率维持在3%的水平不变。 （1)编写函数计算该债券于2019年11月13日至2022年11月13日期间每天的净价、全价和应计利息的变化，并以数据框的形式给出。 （2)并用ggplot2画出债券价、全价和应计利息的变化。