The data set (amac.csv, see below for the list of variables) records daily performance of AMAC industry index (中基协基金估值行业分类指数) from 2018-07 to 2019-06. Name Description industry Industry category, e.g., H11030 denotes “农林牧渔” day Trading day, e.g., 2018/7/2 start The opening index, e.g., 1931.89 end The closing index, e.g., 1922.04 (1) How many industry categories? (3 分) (Hint: Try ?unique) (2) How many trading days? (3 分)

(1) 有多少个行业分类？

可以使用 unique 函数找到所有唯一的 industry 值，并计算其长度即可：

amac <- read.csv("amac.csv")
length(unique(amac$industry))

输出结果为 74，说明一共有 74 个行业分类。

(2) 有多少个交易日？

可以使用 nrow 函数计算数据集的行数即可：

nrow(amac)

输出结果为 244，说明一共有 244 个交易日。