pR = map(analogRead(A5), 0, 1023, 1, 20);
Non so se usi proprio questa riga, ma in questo caso hai un intervallo di tempo da 1 millisecondi a 20 millisecondi. Un uomo non è in grado di percepire queste differenze. Potresti percepire la differenza tra
100 e 300 millisecondi, comunque maggiore è l'intervallo più percepisci la differenza.