check pcr artifacts function implemented in my.utils.R