Передача пропущенного аргумента от функции к функции в R

Можно создать недостающий объект при помощи substitute() без аргумента.

В Вашем случае мы могли сделать round1 недостающий объект в else пункт:

foo = function(a, round0) {
  a = a * pi
  if(!missing(round0)) round(a)
  else a
}

bar = function(b) {
  if(b > 10) round1=T else round1 <- substitute()
  foo(b, round1)
}

bar(9)
#> [1] 28.27433

<глоток>, Созданный 24.10.2019 reprex пакет (v0.3.0)