I found out one solution: Use as() to convert the rules into a data frame.
From there, it can easily be manipulated in any way like if you want sorting or sub-setting.
abc= read.transactions(file="Book2.csv",rm.duplicates=FALSE, format="single", sep=",",cols=c(1,2));
rules_1 <- apriori(abc,parameter = list(sup = 0.001, conf = 0.01, target="rules"));
as(rules_1, "data.frame");