Sim Benilton gerei o arquivo .so com o comando gcc -shared -o arquivo.so arquivo.o. O arquivo.c está localizado na pasta C:\MinGW\bin. Instalei o compilador MinGW!. Primeiramente gerei o executável e o arquivo .o, ou seja, arquivo.exe e arquivo.o. Para gerar os arquivos fui no terminal do Windows e caminhei até o diretório C:\MinGW\bin. Aí pude dar os dois comando: gcc -c arquivo.c e depois fiz gcc -shared -o arquivo.so arquivo.o. Pronto, o arquivo com extensão .SO foi gerado. Depois disso fui no R e mandei ele setar o diretório do arquivo.so que é C:\MinGW\bin, com o comando setwd('C:\\MinGW\\bin'). Depois para mim o que resta é ler o arquivo.so no R. Logo fiz o que segue abaixo e o erro ocorreu.<div>
<br></div><div><div>> dyn.load("teste.so")</div><div>Erro em inDL(x, as.logical(local), as.logical(now), ...) : </div><div>impossível carregar objeto compartilhado 'C:/MinGW/bin/teste.so':</div><div>LoadLibrary failure: %1 não é um aplicativo Win32 válido.</div>
<div><br></div><div><br></div><div>O conteúdo do arquivo.c é bem simples só fiz para testar e está logo abaixo:</div><div><br></div><div><div>/*</div><div> Programa: exfun.c</div><div> Objetivo; Primeiro exemplo de uso de funcao</div>
<div> Autor: Adriano Cruz</div><div> Data: 12/10/97</div><div>*/</div><div>#include<stdio.h></div><div><br></div><div>/* Prototipo da funcao */</div><div>int soma(int, int);</div><div><br></div><div><br></div><div>
/* Funcao Principal */</div><div> int main()</div><div>{</div><div><br></div><div> int a=5, b=9;</div><div><br></div><div> printf("\n%d", soma(a,b));</div><div> getch();</div><div><br></div><div><span class="Apple-tab-span" style="white-space:pre"> </span> return 0;</div>
<div>}</div><div><br></div><div>/* Definicao da funcao */</div><div>int soma(int a, int b)</div><div>{</div><div> return a+b;</div><div>}</div></div><div><br></div><div><br><div class="gmail_quote">Em 25 de agosto de 2011 15:54, beniltoncarvalho [via R-br] <span dir="ltr"><<a href="mailto:ml-node%2B3769122-1021070905-223914@n4.nabble.com">ml-node+3769122-1021070905-223914@n4.nabble.com</a>></span> escreveu:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex;">
qual eh o caminho onde esta o teste.so?
<br><br>como vc gerou o teste.so?
<br><br>qual o conteudo do seu teste.c?
<br><br>e qual eh o resultado de getwd() dentro do R?
<br><div class="im"><br>b
<br>_______________________________________________
<br>R-br mailing list
<br><a href="http://user/SendEmail.jtp?type=node&node=3769122&i=0" rel="nofollow" link="external" target="_blank">[hidden email]</a>
<br><a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" rel="nofollow" link="external" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br>Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" rel="nofollow" link="external" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.
<br>
<br>
<br>
<hr noshade size="1" color="#cccccc">
</div><div style="color:#444;font:12px tahoma,geneva,helvetica,arial,sans-serif"><div class="im">
<div style="font-weight:bold">If you reply to this email, your message will be added to the discussion below:</div>
</div><a href="http://r-br.2285057.n4.nabble.com/R-br-Duvida-Invocar-funcoes-C-no-R-tp3768159p3769122.html" target="_blank">http://r-br.2285057.n4.nabble.com/R-br-Duvida-Invocar-funcoes-C-no-R-tp3768159p3769122.html</a>
</div><div><div></div><div class="h5">
<div style="color:#666;font:11px tahoma,geneva,helvetica,arial,sans-serif;margin-top:.4em">
To unsubscribe from R-br, <a href="http://r-br.2285057.n4.nabble.com/template/NamlServlet.jtp?macro=unsubscribe_by_code&node=3357982&code=cGVkcm8ucmFmYWVsLm1hcmluaG9AZ21haWwuY29tfDMzNTc5ODJ8NTAyMjI0MDYw" target="_blank">click here</a>.
</div></div></div></blockquote></div><br><br clear="all"><div><br></div>-- <br><font color="#000099">Saudações,</font><div><font color="#000099">Pedro Rafael Diniz Marinho.</font></div><font color="#000099"><br></font><br>
</div></div>