Skip to main content
Tweeted twitter.com/StackOverflowPT/status/1077761059816202240
Comenta as partes que são resultado do código
Fonte Link
Tomás Barcellos
  • 5,8mil
  • 2
  • 16
  • 40

Ao chamar a função dplyr::n() no ambiente global, ocorre um erro.

n()
# Error: This function should not be called directly

Esse erro faz sentido e fiquei curioso para ver como ele era implementado.

n
# function () 
# {
#     abort("This function should not be called directly")
# }
# <bytecode: 0x000000001650f200>
# <environment: namespace:dplyr>

Para minha surpresa, no entanto, não há nenhum if ou verificação de condição. Apenas joga o erro. O mesmo não ocorre quando chamamos n() no seu habitat natural.

mtcars %>% 
  group_by(cyl) %>% 
  summarise(n = n()) 

# # A tibble: 3 x 2
#     cyl     n
#   <dbl> <int>
# 1     4    11
# 2     6     7
# 3     8    14

Então as perguntas que ficam são duas:

  1. Como a função n() sabe que está sendo chamada em outro contexto? e
  2. Como a função n() conta? (onde está o código-fonte dessa parte)

Ao chamar a função dplyr::n() no ambiente global, ocorre um erro.

n()
# Error: This function should not be called directly

Esse erro faz sentido e fiquei curioso para ver como ele era implementado.

n
function () 
{
    abort("This function should not be called directly")
}
<bytecode: 0x000000001650f200>
<environment: namespace:dplyr>

Para minha surpresa, no entanto, não há nenhum if ou verificação de condição. Apenas joga o erro. O mesmo não ocorre quando chamamos n() no seu habitat natural.

mtcars %>% 
  group_by(cyl) %>% 
  summarise(n = n())
# A tibble: 3 x 2
    cyl     n
  <dbl> <int>
1     4    11
2     6     7
3     8    14

Então as perguntas que ficam são duas:

  1. Como a função n() sabe que está sendo chamada em outro contexto? e
  2. Como a função n() conta? (onde está o código-fonte dessa parte)

Ao chamar a função dplyr::n() no ambiente global, ocorre um erro.

n()
# Error: This function should not be called directly

Esse erro faz sentido e fiquei curioso para ver como ele era implementado.

n
# function () 
# {
#     abort("This function should not be called directly")
# }
# <bytecode: 0x000000001650f200>
# <environment: namespace:dplyr>

Para minha surpresa, no entanto, não há nenhum if ou verificação de condição. Apenas joga o erro. O mesmo não ocorre quando chamamos n() no seu habitat natural.

mtcars %>% 
  group_by(cyl) %>% 
  summarise(n = n()) 

# # A tibble: 3 x 2
#     cyl     n
#   <dbl> <int>
# 1     4    11
# 2     6     7
# 3     8    14

Então as perguntas que ficam são duas:

  1. Como a função n() sabe que está sendo chamada em outro contexto? e
  2. Como a função n() conta? (onde está o código-fonte dessa parte)
Fonte Link
Tomás Barcellos
  • 5,8mil
  • 2
  • 16
  • 40

Como a função `dplyr::n()` sabe que não está sendo chamada do ambiente global?

Ao chamar a função dplyr::n() no ambiente global, ocorre um erro.

n()
# Error: This function should not be called directly

Esse erro faz sentido e fiquei curioso para ver como ele era implementado.

n
function () 
{
    abort("This function should not be called directly")
}
<bytecode: 0x000000001650f200>
<environment: namespace:dplyr>

Para minha surpresa, no entanto, não há nenhum if ou verificação de condição. Apenas joga o erro. O mesmo não ocorre quando chamamos n() no seu habitat natural.

mtcars %>% 
  group_by(cyl) %>% 
  summarise(n = n())
# A tibble: 3 x 2
    cyl     n
  <dbl> <int>
1     4    11
2     6     7
3     8    14

Então as perguntas que ficam são duas:

  1. Como a função n() sabe que está sendo chamada em outro contexto? e
  2. Como a função n() conta? (onde está o código-fonte dessa parte)