This is not a R related question per se, maybe you should try to rephrase your question as a reproducible example