Clojure Найти медиану по заданному списку чисел

@_sg · Регистрация: 12.05.2012

Author24 — интернет-сервис помощи студентам

Find the Median by HackerRank https://www.hackerrank.com

Given a list of numbers, can you find the median?

https://www.hackerrank.com/cha... an/problem

@vlisp · 08.01.2018, 01:44

Lisp

1	(/ (apply '+ v) (length v))

@_sg · 08.01.2018, 08:44 **[ТС]**

Цитата:
Если все элементы выборки различны, то медиана — это такое число выборки, что ровно половина из элементов выборки больше него, а другая половина меньше него. В более общем случае медиану можно найти, упорядочив элементы выборки по возрастанию или убыванию и взяв средний элемент. Например, выборка {11, 9, 3, 5, 5} после упорядочивания превращается в {3, 5, 5, 9, 11} и её медианой является число 5. https://ru.wikipedia.org/wiki/Медиана_(статистика)

Sample Input :

Lisp

1 2	7 0 1 2 4 6 5 3

Sample Output:

Lisp

https://www.hackerrank.com — в том числе: Common Lisp, Clojure, Racket

P.S. задача — втравить

@Catstail · 08.01.2018, 12:03

HomeLisp:

Lisp

(defun medi (lst)
  (let ((s-lst (qsort lst))
        (n (length lst))) 
    (if (evenp n) (/ (+ (nth (/ n 2) s-lst) (nth (- (/ n 2) 1) s-lst)) 2)
                  (nth (\ n 2) s-lst))))
 
==> MEDI
 
(medi '(1 2 3 4 5 6))
 
==> 7/2
 
(medi '(1 2 3 4 5))
 
==> 3

@helter · 08.01.2018, 17:04

В википедии написано, можно сделать за O(n).

@Catstail · 08.01.2018, 17:54

helter, для предварительно ранжированного ряда? Согласен.

@helter · 08.01.2018, 21:15

Не, в общем случае.
https://ru.wikipedia.org/wiki/Алгоритм_выбора
Там приведён детерминистичный алгоритм и более простой стохастический.

Сообщение от _sg

задача — втравить

Кого во что в смысле втравить?

@_sg · 08.01.2018, 22:01 **[ТС]**

helter, участников форума в разбор задач с https://www.hackerrank.com (понравился сайт).

@helter · 09.01.2018, 04:19

Не по теме:

Без регистрации ничего не показывает?

@Catstail · 09.01.2018, 08:44

helter, да, прошел мимо. Спасибо, интересно!

@_sg · 09.01.2018, 09:31 **[ТС]**

Сообщение от helter

Без регистрации ничего не показывает?

"@hackerrank is addictive" )

Добавлено через 7 минут
начинать с этой задачи: https://www.hackerrank.com/cha... st/problem

Добавлено через 1 минуту
решения можно отфильтровать по: Common Lisp (SBCL), Clojure, Racket

@Catstail Модератор 37349 / 20780 / 4277 Регистрация: 12.02.2012 Сообщений: 34,190 Записей в блоге: 14
	09.01.2018, 08:44	10
	helter, да, прошел мимо. Спасибо, интересно! 1

@_sg 4705 / 4400 / 380 Регистрация: 12.05.2012 Сообщений: 3,100
		1
	Clojure Найти медиану по заданному списку чисел 08.01.2018, 00:32. Показов 1975. Ответов 10 Метки нет (Все метки) Find the Median by HackerRank https://www.hackerrank.com Given a list of numbers, can you find the median? https://www.hackerrank.com/cha... an/problem 0

@helter 4527 / 3521 / 358 Регистрация: 12.03.2013 Сообщений: 6,038
	08.01.2018, 17:04	5
	В википедии написано, можно сделать за O(n). 1

@Catstail Модератор 37349 / 20780 / 4277 Регистрация: 12.02.2012 Сообщений: 34,190 Записей в блоге: 14
	08.01.2018, 17:54	6
	helter, для предварительно ранжированного ряда? Согласен. 1

@helter 4527 / 3521 / 358 Регистрация: 12.03.2013 Сообщений: 6,038
	08.01.2018, 21:15	7
	Не, в общем случае. https://ru.wikipedia.org/wiki/Алгоритм_выбора Там приведён детерминистичный алгоритм и более простой стохастический. Сообщение от _sg задача — втравить Кого во что в смысле втравить? 2

@_sg 4705 / 4400 / 380 Регистрация: 12.05.2012 Сообщений: 3,100
	08.01.2018, 22:01 [ТС]	8
	helter, участников форума в разбор задач с https://www.hackerrank.com (понравился сайт). 0

@helter
	09.01.2018, 04:19 #9
	Не по теме: Без регистрации ничего не показывает? 0

@_sg 4705 / 4400 / 380 Регистрация: 12.05.2012 Сообщений: 3,100
	09.01.2018, 09:31 [ТС]	11
	Сообщение от helter Без регистрации ничего не показывает? "@hackerrank is addictive" ) Добавлено через 7 минут начинать с этой задачи: https://www.hackerrank.com/cha... st/problem Добавлено через 1 минуту решения можно отфильтровать по: Common Lisp (SBCL), Clojure, Racket 0