Desafío

Utilizando los datos de la API aquí , muestre los nombres de los tres países con la mayor cantidad de medallas de oro olímpicas en los Juegos Olímpicos de Río 2016 (es decir, el primer elemento de la lista devuelta).

Por ejemplo, en el momento de la publicación (18:23 UTC + 1, lunes 15 de agosto), EE. UU., El Reino Unido y China tienen la mayor cantidad de medallas de oro, por lo que la producción sería:

United States
Great Britain
China

Los nombres de los países deben estar separados por líneas nuevas y es posible que tenga líneas nuevas o iniciales.

Una vez que los Juegos Olímpicos han terminado, el programa no tiene que funcionar como se esperaba.

Los acortadores de URL no están permitidos, pero las bibliotecas de análisis JSON están permitidas.

Este es el código de golf, por lo que gana el código más corto en bytes.

^{Voy a seguir tratando de obtener un desafío temático de los Juegos Olímpicos aquí}

Tabla de clasificación

var QUESTION_ID=89919,OVERRIDE_USER=30525;function answersUrl(e){return"https://api.stackexchange.com/2.2/questions/"+QUESTION_ID+"/answers?page="+e+"&pagesize=100&order=desc&sort=creation&site=codegolf&filter="+ANSWER_FILTER}function commentUrl(e,s){return"https://api.stackexchange.com/2.2/answers/"+s.join(";")+"/comments?page="+e+"&pagesize=100&order=desc&sort=creation&site=codegolf&filter="+COMMENT_FILTER}function getAnswers(){jQuery.ajax({url:answersUrl(answer_page++),method:"get",dataType:"jsonp",crossDomain:!0,success:function(e){answers.push.apply(answers,e.items),answers_hash=[],answer_ids=[],e.items.forEach(function(e){e.comments=[];var s=+e.share_link.match(/\d+/);answer_ids.push(s),answers_hash[s]=e}),e.has_more||(more_answers=!1),comment_page=1,getComments()}})}function getComments(){jQuery.ajax({url:commentUrl(comment_page++,answer_ids),method:"get",dataType:"jsonp",crossDomain:!0,success:function(e){e.items.forEach(function(e){e.owner.user_id===OVERRIDE_USER&&answers_hash[e.post_id].comments.push(e)}),e.has_more?getComments():more_answers?getAnswers():process()}})}function getAuthorName(e){return e.owner.display_name}function process(){var e=[];answers.forEach(function(s){var r=s.body;s.comments.forEach(function(e){OVERRIDE_REG.test(e.body)&&(r="<h1>"+e.body.replace(OVERRIDE_REG,"")+"</h1>")});var a=r.match(SCORE_REG);a&&e.push({user:getAuthorName(s),size:+a[2],language:a[1],link:s.share_link})}),e.sort(function(e,s){var r=e.size,a=s.size;return r-a});var s={},r=1,a=null,n=1;e.forEach(function(e){e.size!=a&&(n=r),a=e.size,++r;var t=jQuery("#answer-template").html();t=t.replace("{{PLACE}}",n+".").replace("{{NAME}}",e.user).replace("{{LANGUAGE}}",e.language).replace("{{SIZE}}",e.size).replace("{{LINK}}",e.link),t=jQuery(t),jQuery("#answers").append(t);var o=e.language;/<a/.test(o)&&(o=jQuery(o).text()),s[o]=s[o]||{lang:e.language,user:e.user,size:e.size,link:e.link}});var t=[];for(var o in s)s.hasOwnProperty(o)&&t.push(s[o]);t.sort(function(e,s){return e.lang>s.lang?1:e.lang<s.lang?-1:0});for(var c=0;c<t.length;++c){var i=jQuery("#language-template").html(),o=t[c];i=i.replace("{{LANGUAGE}}",o.lang).replace("{{NAME}}",o.user).replace("{{SIZE}}",o.size).replace("{{LINK}}",o.link),i=jQuery(i),jQuery("#languages").append(i)}}var ANSWER_FILTER="!t)IWYnsLAZle2tQ3KqrVveCRJfxcRLe",COMMENT_FILTER="!)Q2B_A2kjfAiU78X(md6BoYk",answers=[],answers_hash,answer_ids,answer_page=1,more_answers=!0,comment_page;getAnswers();var SCORE_REG=/<h\d>\s*([^\n,]*[^\s,]),.*?(\d+)(?=[^\n\d<>]*(?:<(?:s>[^\n<>]*<\/s>|[^\n<>]+>)[^\n\d<>]*)*<\/h\d>)/,OVERRIDE_REG=/^Override\s*header:\s*/i;

body{text-align:left!important}#answer-list,#language-list{padding:10px;width:290px;float:left}table thead{font-weight:700}table td{padding:5px}

<script src="https://ajax.googleapis.com/ajax/libs/jquery/2.1.1/jquery.min.js"></script> <link rel="stylesheet" type="text/css" href="//cdn.sstatic.net/codegolf/all.css?v=83c949450c8b"> <div id="answer-list"> <h2>Leaderboard</h2> <table class="answer-list"> <thead> <tr><td></td><td>Author</td><td>Language</td><td>Size</td></tr></thead> <tbody id="answers"> </tbody> </table> </div><div id="language-list"> <h2>Winners by Language</h2> <table class="language-list"> <thead> <tr><td>Language</td><td>User</td><td>Score</td></tr></thead> <tbody id="languages"> </tbody> </table> </div><table style="display: none"> <tbody id="answer-template"> <tr><td>{{PLACE}}</td><td>{{NAME}}</td><td>{{LANGUAGE}}</td><td>{{SIZE}}</td><td><a href="{{LINK}}">Link</a></td></tr></tbody> </table> <table style="display: none"> <tbody id="language-template"> <tr><td>{{LANGUAGE}}</td><td>{{NAME}}</td><td>{{SIZE}}</td><td><a href="{{LINK}}">Link</a></td></tr></tbody> </table>

bash + w3m + grep + cut, 65 59 58 54 bytes

w3m medalbot.com/api/v1/medals|grep -m3 m|cut -d\" -f4

• 6 bytes menos gracias a las sugerencias de @ Joe.
• 1 byte menos gracias a @YOU.
• 4 bytes menos gracias a @manatwork sugerencia 's que la API medalbot parece funcionar sin www. subdominio también .

C (+ sockets), 433 429 280 276 270 259 bytes

#define H"medalbot.com"
char**p,B[999],*b=B;main(f){connect(f=socket(2,1,getaddrinfo("www."H,"80",0,&p)),p[4],16);send(f,"GET http://"H"/api/v1/medals HTTP/1.1\r\nHost:"H"\r\n\r\n",69);read(f,b,998);for(f=3;f--;puts(p))b=strchr(p=strstr(++b,"_n")+9,34),*b=0;}

Entonces resulta que C no es bueno para descargar recursos de Internet y analizarlos como JSON. ¿Quien sabe?

Este código es (naturalmente) súper laxo con verificación de errores, por lo que supongo que si medalbot.com quisiera enviar datos maliciosos, podrían desencadenar desbordamientos de búfer, etc. Además, el último código espera ciertos valores para las constantes (por ejemplo AF_INET = 2) será probablemente ser el caso en todas partes, pero no está garantizada.

Aquí está el código original que no es tan frágil (pero aún así no es muy robusto o seguro):

#include<netdb.h>
#define H"medalbot.com"
char*b,*B,d[999];struct addrinfo*p,h;main(f){h.ai_socktype=SOCK_STREAM;getaddrinfo("www."H,"80",&h,&p);f=socket(p->ai_family,p->ai_socktype,p->ai_protocol);connect(f,p->ai_addr,p->ai_addrlen);send(f,"GET http://"H"/api/v1/medals HTTP/1.1\r\nHost: "H":80\r\nConnection: close\r\n\r\n",92,0);recv(f,d,998,0);for(f=0,b=d;f<3;++f)B=strstr(b,"_n")+9,b=strchr(B,'}'),*strchr(B,'"')=0,puts(B);}

Descompostura:

                            // No imports needed whatsoever!
#define H"medalbot.com"     // Re-use the host in multiple places
char**p,                    // This is actually a "struct addrinfo*"
    B[999],                 // The download buffer (global to init with 0)
    *b=B;                   // A mutable pointer to the buffer

main(f){
    // Hope for the best: try the first suggested address with no fallback:
    // (medalbot.com runs on Heroku which has dynamic IPs, so we must look up the
    // IP each time using getaddrinfo)
    f=socket(2,1,getaddrinfo("www."H,"80",0,&p));
                            // 2 = AF_INET
                            // 1 = SOCK_STREAM
                            //     (may not match getaddrinfo, but works anyway)
                            // 0 = IP protocol (getaddrinfo returns 0 on success)
    connect(f,p[4],16);     // struct addrinfo contains a "struct sockaddr" pointer
                            // which is aligned at 32 bytes (4*8)

    // Send the HTTP request (not quite standard, but works. 69 bytes long)
    send(f,"GET http://"H"/api/v1/medals HTTP/1.1\r\nHost:"H"\r\n\r\n",69);
    // (omit flags arg in send and hope 0 will be assumed)

    read(f,b,998);          // Get first 998 bytes of response; same as recv(...,0)

    // Loop through the top 3 & print country names:
    // (p is re-used as a char* now)
    for(f=3;f--;puts(p))        // Loop and print:
        p=strstr(++b,"_n")+9,   //  Find "country_name": "
        b=strchr(p,34),         //  Jump to closing "
        *b=0;                   //  Set the closing " to \0
}

Esto no es muy bueno para el servidor ya que no enviamos Connection: close\r\ncomo parte de la solicitud HTTP. También omite el Acceptencabezado ya que medalbot.com no parece estar usando compresión en ningún caso, y pierde el espacio después Host:(nuevamente, el servidor parece estar bien con esto). Sin embargo, no parece que se pueda eliminar nada más.

Una vez que finalizan las olimpiadas, el comportamiento más probable para este programa es segfault tratando de leer la ubicación de memoria 9. A menos que un pirata informático malvado se haga cargo del dominio, en cuyo caso el comportamiento más probable es que establezca algún byte a 0 en la dirección estructuras de información, que probablemente no sea demasiado peligroso en realidad. ¿Pero quién puede decir con estos malvados hackers?

PowerShell v4 +, 88 69 bytes

(ConvertFrom-Json(iwr medalbot.com/api/v1/medals))[0..2].country_name

Utiliza iwr(el alias para Invoke-WebRequest) para obtener la API. Lo alimentamos como parámetro de entrada al ConvertFrom-Jsonincorporado que extrae el texto JSON en una matriz de objetos personalizada. Encapsulamos esa matriz de objetos en parens, tomamos los primeros tres elementos [0..2]y tomamos el .country_namede cada uno de ellos.

Requiere al menos v4 + para las propiedades de múltiples objetos, de lo contrario necesitaríamos usar algo como en su |Select "country_name"lugar. Requiere al menos v3 + para el ConvertFrom-Jsonincorporado.

PS C:\Tools\Scripts\golfing> .\olympics-gold-leader.ps1
United States
Great Britain
China

R, 98, 112 , 108 bytes

Golfed 4 gracias a @miff

a=jsonlite::fromJSON(readLines("http://www.medalbot.com/api/v1/medals"))
cat(a$c[order(-a$g)[1:3]],sep="\n")

La primera línea importa datos utilizando una biblioteca JSON. La segunda línea toma los nombres de países relevantes. Ordena los países por medallas de oro en orden creciente, invierte los índices y toma los primeros 3, imprimiéndolos.

JavaScript (ES6), 122 bytes

fetch`http://www.medalbot.com/api/v1/medals`.then(a=>a.json()).then(b=>alert(b.slice(0,3).map(c=>c.country_name).join`\n`))

Debido a un problema de seguridad del navegador , este código debe ejecutarse medalbot.com. Sin embargo, no aprovecha eso y podría ejecutarse en otro lugar. También tenga en cuenta que inserté el \ncarácter, pero solo cuento como uno, porque podría reemplazarlo por uno

Nodo.js (ES6), 173 bytes

require("http").get("http://www.medalbot.com/api/v1/medals",s=>s.on("data",d=>t+=d,t="").on("end",q=>console.log(JSON.parse(t).slice(0,3).map(a=>a.country_name).join`\n`)))

Esto habría sido mucho más corto si la API devolviera los datos en un solo tramo, pero dado que regresa en dos secciones, debo concatenar las partes y combinarlas, y luego analizarlas.

Node.js (ES6) + Solicitud, 138 bytes

require("request")("http://www.medalbot.com/api/v1/medals",(e,r,b)=>console.log(JSON.parse(b).slice(0,3).map(a=>a.country_name).join`\n`))

Mejor, pero aún no tan bueno como la versión del navegador. Gracias a buscar API! Request es una popular biblioteca de cliente HTTP que se usa para simplificar las solicitudes, y puede ver que surte efecto aquí.

bash + w3m + jq ,83 59 bytes

w3m medalbot.com/api/v1/medals|jq -r '.[:3][].country_name'

Gracias a Jordan por tres bytes.

¡Gracias a USTED por 24 bytes más! Resulta que los datos están ordenados. Guau. :RE

Java 8, 261 258 bytes

Esto utiliza una lambda para guardar un par de bytes y la biblioteca de red para obtener la página web. Aparte de eso es solo Java.

()->{try{for(int i=0;i<3;System.out.println(new java.util.Scanner(new java.net.URL("http://www.medalbot.com/api/v1/medals").openConnection().getInputStream()).useDelimiter("\\A").next().split("\n")[i++*9+3].replaceAll(".* \"|\",","")));}catch(Exception e){}}

Aquí está mi (antiguo) POJO para probar (y jugar golf):

class QuickGolf {
  static void f(h x){x.g();}
  static interface h{ void g(); }
  static void main(String[] args){
    f(
      ()->{try{for(int i=0;i<3;i++){System.out.println(new java.util.Scanner(new java.net.URL("http://www.medalbot.com/api/v1/medals").openConnection().getInputStream()).useDelimiter("\\A").next().split("\n")[i*9+3].substring(21).replace("\",",""));}}catch(Exception e){}}
    );
  }
}

Actualizar

• -3 [16-08-17] Mueve la declaración de impresión al ciclo for
• -5 [16-08-16] Reemplazo de expresiones regulares mejorado
• -9 [16-08-16] Se eliminó la java.netimportación

MATL , 67 bytes

'http://www.medalbot.com/api/v1/medals'Xi'(?<="c.+e": ")[^"]+'XX3:)

Esto no funciona en línea porque la función Xi( urlread) no está permitida.

Ejemplo de ejecución:

>> matl
 > 'http://www.medalbot.com/api/v1/medals'Xi'(?<="c.+e": ")[^"]+'XX3:)
 > 
United States
Great Britain
China

Explicación

Esto lee el contenido como una cadena y luego aplica la expresión regular '(?<="c.+e": ")[^"]+'para extraer nombres de países. La expresión regular utiliza mirar hacia atrás con en "c.+e"lugar de "country_name"reducir la longitud del código.

'http://www.medalbot.com/api/v1/medals'   % Push string representing the URL
Xi                                        % Read URL contents as a string
'(?<="c.+e": ")[^"]+'                     % String for regex matching
XX                                        % Apply regex
3:)                                       % Get first 3 results

Python 3, 202 , 164 bytes.

Python 3 no hace un manejo corto de url / json. : /
No me di cuenta de que la API ya está ordenada por conteo de oro

from urllib.request import*
import json
print('\n'.join(x['country_name']for x in json.loads(urlopen('http://www.medalbot.com/api/v1/medals').read().decode())[:3]))

Python 2, 120 113 bytes

from urllib import*
for x in list(urlopen("http://www.medalbot.com/api/v1/medals"))[3:26:9]:
    print x[21:-4]

Gracias @Nick T y @Value Ink

JavaScript + jQuery, 114100 bytes

$.get("www.medalbot.com/api/v1/medals",a=>alert(a[0][c='country_name']+'\n'+a[1][c]+'\n'+a[2][c]))

Por el motivo de las solicitudes de origen cruzado, esto debe ejecutarse desde el medalbot.comdominio (con jQuery).

Historia

• -14 bytes gracias a @YetiCGN
• -2 bytes gracias a Yay295

Ruby, 97 79 + -rnet/http(11) = 90 bytes

Utiliza una modificación del patrón regex de la respuesta MATL de Luis Mendo , optimizada aún más por @Jordan, ya que Ruby no admite cuantificadores en retrospectivas.

-18 bytes de @Jordan.

puts Net::HTTP.get("www.medalbot.com","/api/v1/medals").scan(/"c.+"(.+)"/)[0,3]

PowerShell, 60

(iwr medalbot.com/api/v1/medals|convertfrom-json)[0..2]|% c*

La misma idea básica que TimmyD (no vi su respuesta antes de publicar), pero un poco más corta :-)

Mathematica 96 66 bytes

@alephalpha encontró una manera de trabajar directamente desde el archivo (sin guardarlo), ¡ahorrando así 30 bytes!

Import["http://www.medalbot.com/api/v1/medals","RawJSON"][[;;3,2]]

Importimporta el archivo como un archivo JSON sin formato. [[;;3,2]]toma las filas 1-3, segunda entrada (nombre del país).

PHP, 205 139 124 116 111 109 bytes

Solo quería usar el nuevo operador de nave espacial para PHP 7 una vez ( EDITAR : es superfluo, ya que no es necesario ordenarlo):

<?$d=json_decode(file_get_contents('http://www.medalbot.com/api/v1/medals'),1);usort($d,function($a,$b){$g='gold_count';return$b[$g]<=>$a[$g];});$c='country_name';foreach([0,1,2]as$i){echo$d[$i][$c]."\n";}

Si omitimos el paso de clasificación innecesario y asumimos que la API entrega los datos ya ordenados por gold_count descendente (como parece), podemos acortar esto aún más:

while($i<3)echo json_decode(file_get_contents('http://medalbot.com/api/v1/medals'))[+$i++]->country_name."
";

Nota: El salto de línea dentro de la cadena es intencional para guardar un byte de \ n

Historia

• Se omitieron algunas comillas y llaves que arrojarán avisos, se eliminó la variable $ c para el índice country_name. Gracias a @manatwork por estos consejos para salvar aún más personajes.
• Gracias a @jeroen por señalar el ciclo while más corto, también se cambió al acceso a objetos para pasar de 124 a 116
• Ahorró 5 bytes más llamando a la API dentro del bucle. Por supuesto, lleva más tiempo y registra la API, pero es Code Golf. Necesita PHP 5.5 para funcionar debido a la desreferenciación de la matriz.
• Ahorró 2 bytes más al eliminar la etiqueta abierta corta, según esta meta respuesta

BASH + w3m + utilidades principales, 70 bytes

w3m www.medalbot.com/api/v1/medals|grep -m3 tr|cut -f6- -d\ |tr -d \",

Parece que la salida ya está ordenada. Solo necesito tirar todo el texto extra.

CJam (57 bytes)

"http://www.medalbot.com/api/v1/medals"gN/3>9%3<{'"/3=N}%

La demostración en línea no está disponible porque recupera contenido de la web. Esto engaña al no analizar JSON en realidad, pero suponiendo que la estructura no cambiará. (Pero también lo hacen la mayoría de las respuestas existentes, de diferentes maneras).

Python 2, 117 bytes

from requests import *
for x in get('http://www.medalbot.com/api/v1/medals').json()[:3]:
    print(x['country_name'])

Clojure, 122 bytes

(fn[](mapv #(println(%"country_name"))(take 3(read-string(.replace(slurp"http://www.medalbot.com/api/v1/medals")":""")))))

No se utiliza la biblioteca JSON :). Lee la cadena de la URL, reemplaza los dos puntos con una cadena vacía y evalúa la cadena que resulta en el mapa de Clojure. Toma los primeros 3 elementos y los mapas funcionan con entusiasmo que imprime la country_namepropiedad de cada elemento.

Java 8 386 384 459 bytes

2 bytes guardados de @Easterly Irk

Mi primer envío de código de golf, así que estoy seguro de que hay una manera de ahorrar muchos bytes, pero bueno :)

Utiliza Gson para leer el JSON.

Requiere:

import java.util.*;
import java.io.*;

Código de golf:

void p()throws Exception{List<A> a=new com.google.gson.Gson().fromJson(new InputStreamReader((InputStream)((new java.net.URL("http://www.medalbot.com/api/v1/medals").openConnection())).getContent()),new com.google.gson.reflect.TypeToken<List<A>>(){}.getType());a.sort((b,c)->c.gold_count.compareTo(b.gold_count));for(int i=0;i<3;)System.out.println(a.get(i++).country_name);}class A{String country_name;Integer gold_count;}

Código sin golf:

void p() throws Exception {
    List<A> a = new com.google.gson.Gson().fromJson(new InputStreamReader((InputStream)((new java.net.URL("http://www.medalbot.com/api/v1/medals").openConnection())).getContent()),new com.google.gson.reflect.TypeToken<List<A>>(){}.getType());
    a.sort((b, c) -> c.gold_count.compareTo(b.gold_count));
    for(int i=0; i<3;)
        System.out.println(a.get(i++).country_name);
}

class A {
    String country_name;
    Integer gold_count;
}

R, 97 95 bytes

t=rjson::fromJSON(f="http://www.medalbot.com/api/v1/medals")
for(i in 1:3)cat(t[[c(i,2)]],"\n")

Poca mejora con respecto a la respuesta del usuario5957401, no se requiere clasificación y un nombre de biblioteca más corto. También mi primer intento de jugar al golf;)

Kotlin (Script) , 125 121 119 bytes

java.net.URL("http://medalbot.com/api/v1/medals").readText().lines().filter{'m' in it}.take(3).map{println(it.split('"')[3])}

Ejecutable con kotlinc -script <filename>oa través de IDEA como archivo * .kts.

ahora, si hacemos una suposición MUY grande sobre el formato, incluidos los números de líneas, podemos recortarlo para:

java.net.URL("http://medalbot.com/api/v1/medals").readText().lines().slice(setOf(3,12,21)).map{println(it.split('"')[3])}

o incluso

java.net.URL("http://medalbot.com/api/v1/medals").readText().lines().slice(3..21 step 9).map{println(it.split('"')[3])}

¡Gracias a la gente de Kotlin slack team por ayudarme a recortar un par de docenas de bytes!

Javascript 167 bytes

x=new XMLHttpRequest();x.open("GET","http://www.medalbot.com/api/v1/medals",false);x.send()
i=-3;while(i++)console.log(JSON.parse(x.responseText)[i+2]["country_name"])