In some ways this is better, and in others it is much worse. Using named constants instead of magic numbers, and breaking up complex logic into simpler named parts is a huge win for readability/maintainability, as any programmer quickly learns. The big one liner would be a lot nicer in about 3-4 chunks.
I’d rewrite this example as something like:
[I’m not an R guy, so that might not be the most typical style ever, but you get the idea...]