1 Bibliotecas

library(tidyverse)

2 Objetivos del experimento

  • Determinar qué frecuencia en Hz es considerada una voz agradable o atractiva.
  • Analizar las distintas frecuencias del tono de la voz y comparar cómo varía el mismo entre hombres y mujeres.

3 Marco teórico

La voz puede representar nuestra personalidad y nos permite relacionarnos socialmente, por lo que el tono y otras cualidades acústicas de la voz son importantes, pues “los estudios también demuestran que aunque alguien nos guste al principio, la atracción puede desaparecer enseguida, por su forma de comunicación,especialmente a causa de su voz, porque lo más importante no es qué alguien dice sino cómo lo dice” (Glass, 1994: 205-206).

Emma Rodero Antón (2001) expone en su trabajo “El tono de la voz masculina y femenina en los informativos radiofónicos: un análisis comparativo” la diferencia que puede haber entre hombres y mujeres en el tono de voz que siempre logra ser marcado, además, para el contexto de su trabajo en el caso de la voz masculina, la voz más grave fue la más atractiva para los oyentes radiofónicos ya que les representaba credibilidad, seguridad, etc, en el caso de las mujeres los resultados fueron más variables, pero se puedo concluir que la elegida para los oyentes fue las voz más grave. Esa variación en la voz se da por una diferenciación durante la pubertad, es por ello que la voz masculina tiende a ser más grave y con un tono más bajo, porque poseen cuerdas vocales más largas y más gruesas que las de las mujeres.

Rodero Antón, Emma, and Universidad Pontificia de Salamanca. El tono de la voz masculina y femenina en los informativos radiofónicos: un análisis comparativo. Noviembre 2001, https://www.researchgate.net/profile/Emma-Rodero/publication/287491072_La_voz_masculina_y_femenina_en_los_informativos_radiofonicos/links/56771bab08ae502c99d2efd6/La-voz-masculina-y-femenina-en-los-informativos-radiofonicos.pdf.

4 Hipótesis:

  • Nosotras suponemos que la voz más grave en los hombres va a ser más atractiva para las mujeres y la voz más aguda en las mujeres va a ser más atractiva para los hombres.
  • Deducimos que va a haber una amplia diferencia entre el tono de voz de ambos géneros.
  • Suponemos que va a haber más variación en los tonos de voz de los hombres que en las mujeres.
  • Que un tono con frecuencia baja es el usado para persuadir a una persona.

5 Marco Metodológico

  • Se le medirán el tono de voz a 20 personas (10 hombres y 10 mujeres) con el sensor de Arduino Science Journal y simultáneamente se les grabara la voz.
  • Por medio de la media se clasificarán los tonos de voz de la más grave a la más aguda.
  • Después de clasificar los tonos de voz, se les pondrá a varias personas a escuchar las voces para que decidan qué voz les agrada más y ¿por qué?
  • Luego, sacaremos los resultados con respecto a que tono de voz masculino es más atractivo para las mujeres y viceversa, al igual que tanta discordancia hay entre los tonos de voz en el mismo género.
  • Por último, realizaremos las conclusiones con respecto a nuestra hipótesis.

6 Variable respuesta

Nuestra variable respuesta es el tono. Como sabemos, el tono es la sensación auditiva o atributo psicológico de los sonidos que los caracteriza por ser más agudos o más graves en función de la frecuencia, cuyas propiedades son físicas.

Desde hace un tiempo nos hemos preguntado qué tanto influye el tono de la voz sobre otras personas, sin son las voces graves o agudas las que más atractivas se le hacen tanto a hombres como mujeres, por lo que nos surgieron las siguientes preguntas: ¿Es el tono de voz un determinante a la hora de conseguir pareja o persuadir a una persona?, ¿Cuál es el rango de frecuencia que es más atractivo en ambos casos y cómo discrepa el tono en el mismo género? Es por ello que deseamos investigar dentro de qué frecuencia se encuentran estas voces, comparando nuestros resultados con investigaciones anteriores.

7 Variables de control

  • Vamos a medir como es el comportamiento de la frecuencia del tono entre géneros (Mujeres Vs Hombres)

8 Resultados parciales

8.1 Datos Hombres

voz1_hombre <- read.csv("voz_hombre1.csv") %>% 
  mutate( voz = "voz_hombre",
         frecuencia = "voz1")

voz2_hombre <- read.csv("voz_hombre2.csv") %>% 
  mutate( voz = "voz_hombre",
         frecuencia = "voz2")

voz3_hombre <- read.csv("voz_hombre3.csv") %>% 
  mutate( voz = "voz_hombre",
         frecuencia = "voz3")

voz4_hombre <- read.csv("voz_hombre4.csv") %>% 
  mutate( voz = "voz_hombre",
         frecuencia = "voz4")

8.2 Datos Mujeres

voz1_mujer <- read.csv("voz_mujer1.csv") %>% 
  mutate( voz = "voz_mujer",
         frecuencia = "voz1")

voz2_mujer <- read.csv("voz_mujer2.csv") %>% 
  mutate( voz = "voz_mujer",
         frecuencia = "voz2")

voz3_mujer <- read.csv("voz_mujer3.csv") %>% 
  mutate( voz = "voz_mujer",
         frecuencia = "voz3")

voz4_mujer <- read.csv("voz_mujer4.csv") %>% 
  mutate( voz = "voz_mujer",
         frecuencia = "voz4")

8.3 Datos completos

datos_completos <- bind_rows(voz1_hombre, voz2_hombre, voz3_hombre, voz4_hombre, voz1_mujer, voz2_mujer, voz3_mujer, voz4_mujer) %>% rename(tono = PitchSensor)

datos_completos %>% head

9 Hombres

datos_completos %>% 
  filter( voz == "voz_hombre" ) %>% 
  ggplot(aes(x = timestamp, y = tono, color = frecuencia)) +
  facet_wrap(~frecuencia, scales = "free") +
  geom_line()

10 Mujeres

datos_completos %>% 
  filter( voz == "voz_mujer" ) %>% 
  ggplot(aes(x = timestamp, y = tono, color = frecuencia)) +
  facet_wrap(~frecuencia, scales = "free") +
  geom_line()

11 Distribuciones

  • ¿Son similares las frecuencias del tono entre hombres y mujeres, o varían mucho?
datos_completos %>% 
  ggplot(aes(x = tono, color = voz)) +
  geom_density() 

  • ¿Qué pasa si aplicamos un logaritmo?
datos_completos %>% 
  ggplot(aes(x = tono, color = voz)) +
  geom_density() +
  scale_x_log10()

12 Conclusiones parciales

  • Promedio de la frecuencia del tono en hombres
datos_completos %>% filter(voz == "voz_hombre") %>% summarise(frecuencia = mean(tono))
  • Promedio de la frecuencia del tono en mujeres
datos_completos %>% filter(voz == "voz_mujer") %>% summarise(frecuencia = mean(tono))
  • Nota: por ahora podemos decir que el tono de los hombres y de las mujeres presentan una significativa diferencia, esto lo podemos observar a través del promedio y tambien podemos recalcar que los promedios obtenidos se encuentran dentro de los rangos estableciodos de frecuencia para hombre y mujeres adultos.

  • Hombres: rango entre 85 a 180 Hz

  • Mujeres: rango entre 165 a 255 Hz

LS0tDQp0aXRsZTogIkV4cGVyaW1lbnRvIFRvbm8iDQpzdWJ0aXRsZTogIlZhcmlhY2nDs24gZGUgdG9ubyBlbnRyZSBob21icmVzIHkgbXVqZXJlcyINCmF1dGhvcjogIkF5bGluIENyaXN0aW5hIEVjaGF2YXJyaWEgTWVuZG96YSB5IFNhcmEgTWVsaXNhIFBhbGFjaW8gUmVnaW5vIg0KZGF0ZTogIjctMTEtMjAyMiINCm91dHB1dDoNCiAgaHRtbF9kb2N1bWVudDoNCiAgICB0b2M6IHRydWUNCiAgICB0b2NfZGVwdGg6IDUNCiAgICB0b2NfZmxvYXQ6IHRydWUNCiAgICBudW1iZXJfc2VjdGlvbnM6IHRydWUNCiAgICB0aGVtZTogY29zbW8NCiAgICBoaWdobGlnaHQ6IGJyZWV6ZWRhcmsNCiAgICBkZl9wcmludDogcGFnZWQNCiAgICBjb2RlX2ZvbGRpbmc6IGhpZGUNCiAgICBjb2RlX2Rvd25sb2FkOiB0cnVlDQotLS0NCg0KYGBge3Igc2V0dXAsIGluY2x1ZGU9RkFMU0V9DQprbml0cjo6b3B0c19jaHVuayRzZXQoZWNobyA9IFRSVUUsIGV2YWwgPSBUUlVFLCBmaWcuYWxpZ24gPSAiY2VudGVyIiwNCiAgICAgICAgICAgICAgICAgICAgICBmaWcud2lkdGggPSA1LjUsIGZpZy5oZWlnaHQgPSA0LjUsIHdhcm5pbmcgPSBGQUxTRSwNCiAgICAgICAgICAgICAgICAgICAgICBtZXNzYWdlID0gRkFMU0UpDQpgYGANCg0KDQojIEJpYmxpb3RlY2FzDQoNCmBgYHtyfQ0KbGlicmFyeSh0aWR5dmVyc2UpDQpgYGANCg0KIyBPYmpldGl2b3MgZGVsIGV4cGVyaW1lbnRvDQoNCi0gRGV0ZXJtaW5hciBxdcOpIGZyZWN1ZW5jaWEgZW4gSHogZXMgY29uc2lkZXJhZGEgdW5hIHZveiBhZ3JhZGFibGUgbyBhdHJhY3RpdmEuDQotIEFuYWxpemFyIGxhcyBkaXN0aW50YXMgZnJlY3VlbmNpYXMgZGVsIHRvbm8gZGUgbGEgdm96IHkgY29tcGFyYXIgY8OzbW8gdmFyw61hIGVsIG1pc21vIGVudHJlIGhvbWJyZXMgeSBtdWplcmVzLg0KDQojIE1hcmNvIHRlw7NyaWNvDQoNCkxhIHZveiBwdWVkZSByZXByZXNlbnRhciBudWVzdHJhIHBlcnNvbmFsaWRhZCB5IG5vcyBwZXJtaXRlIHJlbGFjaW9uYXJub3Mgc29jaWFsbWVudGUsIHBvciBsbyBxdWUgZWwgdG9ubyB5IG90cmFzIGN1YWxpZGFkZXMgYWPDunN0aWNhcyBkZSBsYSB2b3ogc29uIGltcG9ydGFudGVzLCBwdWVzIOKAnGxvcyBlc3R1ZGlvcyB0YW1iacOpbiBkZW11ZXN0cmFuIHF1ZSBhdW5xdWUgYWxndWllbiBub3MgZ3VzdGUgYWwgcHJpbmNpcGlvLCBsYSBhdHJhY2Npw7NuIHB1ZWRlIGRlc2FwYXJlY2VyIGVuc2VndWlkYSwgcG9yIHN1IGZvcm1hIGRlIGNvbXVuaWNhY2nDs24sZXNwZWNpYWxtZW50ZSBhIGNhdXNhIGRlIHN1IHZveiwgcG9ycXVlIGxvIG3DoXMgaW1wb3J0YW50ZSBubyBlcyBxdcOpIGFsZ3VpZW4gZGljZSBzaW5vIGPDs21vIGxvIGRpY2XigJ0gKEdsYXNzLCAxOTk0OiAyMDUtMjA2KS4NCg0KRW1tYSBSb2Rlcm8gQW50w7NuICgyMDAxKSBleHBvbmUgZW4gc3UgdHJhYmFqbyAg4oCcRWwgdG9ubyBkZSBsYSB2b3ogbWFzY3VsaW5hIHkgZmVtZW5pbmEgZW4gbG9zIGluZm9ybWF0aXZvcyByYWRpb2bDs25pY29zOiB1biBhbsOhbGlzaXMgY29tcGFyYXRpdm/igJ0gbGEgZGlmZXJlbmNpYSBxdWUgcHVlZGUgaGFiZXIgZW50cmUgaG9tYnJlcyB5IG11amVyZXMgZW4gZWwgdG9ubyBkZSB2b3ogcXVlIHNpZW1wcmUgbG9ncmEgc2VyIG1hcmNhZG8sIGFkZW3DoXMsIHBhcmEgZWwgY29udGV4dG8gZGUgc3UgdHJhYmFqbyBlbiBlbCBjYXNvIGRlIGxhIHZveiBtYXNjdWxpbmEsIGxhIHZveiBtw6FzIGdyYXZlIGZ1ZSBsYSBtw6FzIGF0cmFjdGl2YSBwYXJhIGxvcyBveWVudGVzIHJhZGlvZsOzbmljb3MgeWEgcXVlIGxlcyByZXByZXNlbnRhYmEgY3JlZGliaWxpZGFkLCBzZWd1cmlkYWQsIGV0YywgZW4gZWwgY2FzbyBkZSBsYXMgbXVqZXJlcyBsb3MgcmVzdWx0YWRvcyBmdWVyb24gbcOhcyB2YXJpYWJsZXMsIHBlcm8gc2UgcHVlZG8gY29uY2x1aXIgcXVlIGxhIGVsZWdpZGEgcGFyYSBsb3MgIG95ZW50ZXMgZnVlIGxhcyB2b3ogbcOhcyBncmF2ZS4NCkVzYSB2YXJpYWNpw7NuIGVuIGxhIHZveiBzZSBkYSBwb3IgdW5hIGRpZmVyZW5jaWFjacOzbiBkdXJhbnRlIGxhIHB1YmVydGFkLCBlcyBwb3IgZWxsbyBxdWUgbGEgdm96IG1hc2N1bGluYSB0aWVuZGUgYSBzZXIgbcOhcyBncmF2ZSB5IGNvbiB1biB0b25vIG3DoXMgYmFqbywgcG9ycXVlIHBvc2VlbiBjdWVyZGFzIHZvY2FsZXMgbcOhcyBsYXJnYXMgeSBtw6FzIGdydWVzYXMgcXVlIGxhcyBkZSBsYXMgbXVqZXJlcy4gDQoNClJvZGVybyBBbnTDs24sIEVtbWEsIGFuZCBVbml2ZXJzaWRhZCBQb250aWZpY2lhIGRlIFNhbGFtYW5jYS4gRWwgdG9ubyBkZSBsYSB2b3ogbWFzY3VsaW5hIHkgZmVtZW5pbmEgZW4gbG9zIGluZm9ybWF0aXZvcyByYWRpb2bDs25pY29zOiB1biBhbsOhbGlzaXMgY29tcGFyYXRpdm8uIE5vdmllbWJyZSAyMDAxLCBodHRwczovL3d3dy5yZXNlYXJjaGdhdGUubmV0L3Byb2ZpbGUvRW1tYS1Sb2Rlcm8vcHVibGljYXRpb24vMjg3NDkxMDcyX0xhX3Zvel9tYXNjdWxpbmFfeV9mZW1lbmluYV9lbl9sb3NfaW5mb3JtYXRpdm9zX3JhZGlvZm9uaWNvcy9saW5rcy81Njc3MWJhYjA4YWU1MDJjOTlkMmVmZDYvTGEtdm96LW1hc2N1bGluYS15LWZlbWVuaW5hLWVuLWxvcy1pbmZvcm1hdGl2b3MtcmFkaW9mb25pY29zLnBkZi4NCg0KIyBIaXDDs3Rlc2lzOg0KDQotIE5vc290cmFzIHN1cG9uZW1vcyBxdWUgbGEgdm96IG3DoXMgZ3JhdmUgZW4gbG9zIGhvbWJyZXMgdmEgYSBzZXIgbcOhcyBhdHJhY3RpdmEgcGFyYSBsYXMgbXVqZXJlcyB5IGxhIHZveiBtw6FzIGFndWRhIGVuIGxhcyBtdWplcmVzIHZhIGEgc2VyIG3DoXMgYXRyYWN0aXZhIHBhcmEgbG9zIGhvbWJyZXMuIA0KLSBEZWR1Y2ltb3MgcXVlIHZhIGEgaGFiZXIgdW5hIGFtcGxpYSBkaWZlcmVuY2lhIGVudHJlIGVsIHRvbm8gZGUgdm96IGRlIGFtYm9zIGfDqW5lcm9zLg0KLSBTdXBvbmVtb3MgcXVlIHZhIGEgaGFiZXIgbcOhcyB2YXJpYWNpw7NuIGVuIGxvcyB0b25vcyBkZSB2b3ogZGUgbG9zIGhvbWJyZXMgcXVlIGVuIGxhcyBtdWplcmVzLg0KLSBRdWUgdW4gdG9ubyBjb24gZnJlY3VlbmNpYSBiYWphIGVzIGVsIHVzYWRvIHBhcmEgcGVyc3VhZGlyIGEgdW5hIHBlcnNvbmEuDQoNCg0KIyBNYXJjbyBNZXRvZG9sw7NnaWNvDQoNCi0gU2UgbGUgbWVkaXLDoW4gZWwgdG9ubyBkZSB2b3ogYSAyMCBwZXJzb25hcyAoMTAgaG9tYnJlcyB5IDEwIG11amVyZXMpIGNvbiBlbCBzZW5zb3IgZGUgQXJkdWlubyBTY2llbmNlIEpvdXJuYWwgeSBzaW11bHTDoW5lYW1lbnRlIHNlIGxlcyBncmFiYXJhIGxhIHZvei4NCi0gUG9yIG1lZGlvIGRlIGxhIG1lZGlhIHNlIGNsYXNpZmljYXLDoW4gbG9zIHRvbm9zIGRlIHZveiBkZSBsYSBtw6FzIGdyYXZlIGEgbGEgbcOhcyBhZ3VkYS4NCi0gRGVzcHXDqXMgZGUgY2xhc2lmaWNhciBsb3MgdG9ub3MgZGUgdm96LCBzZSBsZXMgcG9uZHLDoSBhIHZhcmlhcyBwZXJzb25hcyBhIGVzY3VjaGFyIGxhcyB2b2NlcyBwYXJhIHF1ZSBkZWNpZGFuIHF1w6kgdm96IGxlcyBhZ3JhZGEgbcOhcyB5IMK/cG9yIHF1w6k/DQotIEx1ZWdvLCBzYWNhcmVtb3MgbG9zIHJlc3VsdGFkb3MgY29uIHJlc3BlY3RvIGEgcXVlIHRvbm8gZGUgdm96IG1hc2N1bGlubyBlcyBtw6FzIGF0cmFjdGl2byBwYXJhIGxhcyBtdWplcmVzIHkgdmljZXZlcnNhLCBhbCBpZ3VhbCBxdWUgdGFudGEgZGlzY29yZGFuY2lhIGhheSBlbnRyZSBsb3MgdG9ub3MgZGUgdm96IGVuIGVsIG1pc21vIGfDqW5lcm8uDQotIFBvciDDumx0aW1vLCByZWFsaXphcmVtb3MgbGFzIGNvbmNsdXNpb25lcyBjb24gcmVzcGVjdG8gYSBudWVzdHJhIGhpcMOzdGVzaXMuDQoNCiMgVmFyaWFibGUgcmVzcHVlc3RhDQoNCioqTnVlc3RyYSB2YXJpYWJsZSByZXNwdWVzdGEgZXMgZWwgdG9ubyoqLiBDb21vIHNhYmVtb3MsIGVsIHRvbm8gZXMgbGEgc2Vuc2FjacOzbiBhdWRpdGl2YSBvIGF0cmlidXRvIHBzaWNvbMOzZ2ljbyBkZSBsb3Mgc29uaWRvcyBxdWUgbG9zIGNhcmFjdGVyaXphIHBvciBzZXIgbcOhcyBhZ3Vkb3MgbyBtw6FzIGdyYXZlcyBlbiBmdW5jacOzbiBkZSBsYSBmcmVjdWVuY2lhLCBjdXlhcyBwcm9waWVkYWRlcyBzb24gZsOtc2ljYXMuIA0KDQpEZXNkZSBoYWNlIHVuIHRpZW1wbyBub3MgaGVtb3MgcHJlZ3VudGFkbyBxdcOpIHRhbnRvIGluZmx1eWUgZWwgdG9ubyBkZSBsYSB2b3ogc29icmUgb3RyYXMgcGVyc29uYXMsIHNpbiBzb24gbGFzIHZvY2VzIGdyYXZlcyBvIGFndWRhcyBsYXMgcXVlIG3DoXMgYXRyYWN0aXZhcyBzZSBsZSBoYWNlbiB0YW50byBhIGhvbWJyZXMgY29tbyBtdWplcmVzLCBwb3IgbG8gcXVlIG5vcyBzdXJnaWVyb24gbGFzIHNpZ3VpZW50ZXMgcHJlZ3VudGFzOiDCv0VzIGVsIHRvbm8gZGUgdm96IHVuIGRldGVybWluYW50ZSBhIGxhIGhvcmEgZGUgY29uc2VndWlyIHBhcmVqYSBvIHBlcnN1YWRpciBhIHVuYSBwZXJzb25hPywgwr9DdcOhbCBlcyBlbCByYW5nbyBkZSBmcmVjdWVuY2lhIHF1ZSBlcyBtw6FzIGF0cmFjdGl2byBlbiBhbWJvcyBjYXNvcyB5IGPDs21vIGRpc2NyZXBhIGVsIHRvbm8gZW4gZWwgbWlzbW8gZ8OpbmVybz8gRXMgcG9yIGVsbG8gcXVlIGRlc2VhbW9zIGludmVzdGlnYXIgZGVudHJvIGRlIHF1w6kgZnJlY3VlbmNpYSBzZSBlbmN1ZW50cmFuIGVzdGFzIHZvY2VzLCBjb21wYXJhbmRvIG51ZXN0cm9zIHJlc3VsdGFkb3MgY29uIGludmVzdGlnYWNpb25lcyBhbnRlcmlvcmVzLg0KDQojIFZhcmlhYmxlcyBkZSBjb250cm9sDQoNCi0gVmFtb3MgYSBtZWRpciBjb21vIGVzIGVsIGNvbXBvcnRhbWllbnRvIGRlIGxhIGZyZWN1ZW5jaWEgZGVsIHRvbm8gZW50cmUgZ8OpbmVyb3MgKE11amVyZXMgVnMgSG9tYnJlcykgDQoNCiMgUmVzdWx0YWRvcyBwYXJjaWFsZXMNCg0KIyMgRGF0b3MgSG9tYnJlcw0KDQpgYGB7cn0NCnZvejFfaG9tYnJlIDwtIHJlYWQuY3N2KCJ2b3pfaG9tYnJlMS5jc3YiKSAlPiUgDQogIG11dGF0ZSggdm96ID0gInZvel9ob21icmUiLA0KICAgICAgICAgZnJlY3VlbmNpYSA9ICJ2b3oxIikNCg0Kdm96Ml9ob21icmUgPC0gcmVhZC5jc3YoInZvel9ob21icmUyLmNzdiIpICU+JSANCiAgbXV0YXRlKCB2b3ogPSAidm96X2hvbWJyZSIsDQogICAgICAgICBmcmVjdWVuY2lhID0gInZvejIiKQ0KDQp2b3ozX2hvbWJyZSA8LSByZWFkLmNzdigidm96X2hvbWJyZTMuY3N2IikgJT4lIA0KICBtdXRhdGUoIHZveiA9ICJ2b3pfaG9tYnJlIiwNCiAgICAgICAgIGZyZWN1ZW5jaWEgPSAidm96MyIpDQoNCnZvejRfaG9tYnJlIDwtIHJlYWQuY3N2KCJ2b3pfaG9tYnJlNC5jc3YiKSAlPiUgDQogIG11dGF0ZSggdm96ID0gInZvel9ob21icmUiLA0KICAgICAgICAgZnJlY3VlbmNpYSA9ICJ2b3o0IikNCmBgYA0KDQojIyBEYXRvcyBNdWplcmVzDQpgYGB7cn0NCnZvejFfbXVqZXIgPC0gcmVhZC5jc3YoInZvel9tdWplcjEuY3N2IikgJT4lIA0KICBtdXRhdGUoIHZveiA9ICJ2b3pfbXVqZXIiLA0KICAgICAgICAgZnJlY3VlbmNpYSA9ICJ2b3oxIikNCg0Kdm96Ml9tdWplciA8LSByZWFkLmNzdigidm96X211amVyMi5jc3YiKSAlPiUgDQogIG11dGF0ZSggdm96ID0gInZvel9tdWplciIsDQogICAgICAgICBmcmVjdWVuY2lhID0gInZvejIiKQ0KDQp2b3ozX211amVyIDwtIHJlYWQuY3N2KCJ2b3pfbXVqZXIzLmNzdiIpICU+JSANCiAgbXV0YXRlKCB2b3ogPSAidm96X211amVyIiwNCiAgICAgICAgIGZyZWN1ZW5jaWEgPSAidm96MyIpDQoNCnZvejRfbXVqZXIgPC0gcmVhZC5jc3YoInZvel9tdWplcjQuY3N2IikgJT4lIA0KICBtdXRhdGUoIHZveiA9ICJ2b3pfbXVqZXIiLA0KICAgICAgICAgZnJlY3VlbmNpYSA9ICJ2b3o0IikNCmBgYA0KDQojIyBEYXRvcyBjb21wbGV0b3MNCmBgYHtyfQ0KZGF0b3NfY29tcGxldG9zIDwtIGJpbmRfcm93cyh2b3oxX2hvbWJyZSwgdm96Ml9ob21icmUsIHZvejNfaG9tYnJlLCB2b3o0X2hvbWJyZSwgdm96MV9tdWplciwgdm96Ml9tdWplciwgdm96M19tdWplciwgdm96NF9tdWplcikgJT4lIHJlbmFtZSh0b25vID0gUGl0Y2hTZW5zb3IpDQoNCmRhdG9zX2NvbXBsZXRvcyAlPiUgaGVhZA0KYGBgDQoNCiMgSG9tYnJlcw0KDQpgYGB7cn0NCmRhdG9zX2NvbXBsZXRvcyAlPiUgDQogIGZpbHRlciggdm96ID09ICJ2b3pfaG9tYnJlIiApICU+JSANCiAgZ2dwbG90KGFlcyh4ID0gdGltZXN0YW1wLCB5ID0gdG9ubywgY29sb3IgPSBmcmVjdWVuY2lhKSkgKw0KICBmYWNldF93cmFwKH5mcmVjdWVuY2lhLCBzY2FsZXMgPSAiZnJlZSIpICsNCiAgZ2VvbV9saW5lKCkNCg0KYGBgDQoNCiMgTXVqZXJlcw0KDQpgYGB7cn0NCmRhdG9zX2NvbXBsZXRvcyAlPiUgDQogIGZpbHRlciggdm96ID09ICJ2b3pfbXVqZXIiICkgJT4lIA0KICBnZ3Bsb3QoYWVzKHggPSB0aW1lc3RhbXAsIHkgPSB0b25vLCBjb2xvciA9IGZyZWN1ZW5jaWEpKSArDQogIGZhY2V0X3dyYXAofmZyZWN1ZW5jaWEsIHNjYWxlcyA9ICJmcmVlIikgKw0KICBnZW9tX2xpbmUoKQ0KYGBgDQoNCiMgRGlzdHJpYnVjaW9uZXMNCg0KLSDCv1NvbiBzaW1pbGFyZXMgbGFzIGZyZWN1ZW5jaWFzIGRlbCB0b25vIGVudHJlIGhvbWJyZXMgeSBtdWplcmVzLCBvIHZhcsOtYW4gbXVjaG8/DQoNCmBgYHtyfQ0KZGF0b3NfY29tcGxldG9zICU+JSANCiAgZ2dwbG90KGFlcyh4ID0gdG9ubywgY29sb3IgPSB2b3opKSArDQogIGdlb21fZGVuc2l0eSgpIA0KYGBgDQoNCi0gwr9RdcOpIHBhc2Egc2kgYXBsaWNhbW9zIHVuIGxvZ2FyaXRtbz8NCg0KYGBge3J9DQpkYXRvc19jb21wbGV0b3MgJT4lIA0KICBnZ3Bsb3QoYWVzKHggPSB0b25vLCBjb2xvciA9IHZveikpICsNCiAgZ2VvbV9kZW5zaXR5KCkgKw0KICBzY2FsZV94X2xvZzEwKCkNCmBgYA0KDQojIENvbmNsdXNpb25lcyBwYXJjaWFsZXMNCg0KLSBQcm9tZWRpbyBkZSBsYSBmcmVjdWVuY2lhIGRlbCB0b25vIGVuIGhvbWJyZXMNCg0KYGBge3J9DQpkYXRvc19jb21wbGV0b3MgJT4lIGZpbHRlcih2b3ogPT0gInZvel9ob21icmUiKSAlPiUgc3VtbWFyaXNlKGZyZWN1ZW5jaWEgPSBtZWFuKHRvbm8pKQ0KDQpgYGANCg0KLSBQcm9tZWRpbyBkZSBsYSBmcmVjdWVuY2lhIGRlbCB0b25vIGVuIG11amVyZXMNCg0KYGBge3J9DQpkYXRvc19jb21wbGV0b3MgJT4lIGZpbHRlcih2b3ogPT0gInZvel9tdWplciIpICU+JSBzdW1tYXJpc2UoZnJlY3VlbmNpYSA9IG1lYW4odG9ubykpDQoNCmBgYA0KDQotICoqTm90YToqKiBwb3IgYWhvcmEgcG9kZW1vcyBkZWNpciBxdWUgZWwgdG9ubyBkZSBsb3MgaG9tYnJlcyB5IGRlIGxhcyBtdWplcmVzIHByZXNlbnRhbiB1bmEgc2lnbmlmaWNhdGl2YSBkaWZlcmVuY2lhLCBlc3RvIGxvIHBvZGVtb3Mgb2JzZXJ2YXIgYSB0cmF2w6lzIGRlbCBwcm9tZWRpbyB5IHRhbWJpZW4gcG9kZW1vcyByZWNhbGNhciBxdWUgbG9zIHByb21lZGlvcyBvYnRlbmlkb3Mgc2UgZW5jdWVudHJhbiBkZW50cm8gZGUgbG9zIHJhbmdvcyBlc3RhYmxlY2lvZG9zIGRlIGZyZWN1ZW5jaWEgcGFyYSBob21icmUgeSBtdWplcmVzIGFkdWx0b3MuDQoNCi0gKipIb21icmVzOioqIHJhbmdvIGVudHJlIDg1IGEgMTgwIEh6DQotICoqTXVqZXJlczoqKiByYW5nbyBlbnRyZSAxNjUgYSAyNTUgSHoNCg0K