Displaying 1 result from an estimated 1 matches for "jl_array_len".
2014 Jun 24
2
using C code to create data frame but always return as list
...l_string(evalcmd);
  SET_VECTOR_ELT(ans,i,Julia_R_MD_NA(eachcolvector));
 }
 //set names attribute
 sprintf(evalcmd,"names(%s)",dfname);
 jl_value_t* ret=jl_eval_string(evalcmd);
 jl_value_t* onesymbol;
 if (jl_is_array(ret))
 {
  PROTECT(names=allocVector(STRSXP,collen));
  for (i=0;i<jl_array_len(ret);i++)
  { 
   onesymbol=jl_arrayref((jl_array_t*)ret,i);
   if (jl_is_symbol(onesymbol))
    SET_STRING_ELT(names,i,mkChar(((jl_sym_t*)onesymbol)->name));
  }
  setAttrib(ans,R_NamesSymbol,names);
  UNPROTECT(1);
 } 
 //set row names
 sprintf(evalcmd,"size(%s,1)",dfname);
 jl_value...