code: def test_raw_array():
      expr = ast.VectorVal([ast.NumVal(3), ast.NumVal(4)])
  
      expected_code = """
  score <- function(input) {
      return(c(3.0, 4.0))
  }
  """
  
      interpreter = RInterpreter()
      assert_code_equal(interpreter.interpret(expr), expected_code)
  
imports: from itertools import product
  import pytest
  from m2cgen import ast
  from m2cgen.interpreters import RInterpreter
  from tests.utils import assert_code_equal
label_desc: Use image node_id 6 for calling a global function with example usage: test_raw_array() without return types