>столбец с нулевым номером
А ты неплох, продолжай.
Не я это придумал.
Вот:
Функция должна возвращать новую матрицу размера m×(n+1), полученную вставкой после столбца с номером j нового столбца с элементами из v. j=0 означает вставку перед самым первым столбцом.
Исходный массив A должен оставаться неизменным.
Идешь циклом по первому измерению первого массива
На каждый i-й ряд вызываешь другую функцию, куда передаешь сам ряд, i-й элемент второго и третий параметр
Эта другая функция возвращает новый массив, где уже вставлен новый элемент
>на языке Коммон Лисп
Ну хоть не пасцаль и то хорошо.
Не буду тебя нахуй посылать.
Корректировочка.
Идём лупом по всем массивам из А, сравниваем номер текущего элемента с j: если совпали, то пишем сначала исходный элемент, а за ним - из v.
Паскаль у нас в школе был, так что травма у меня уже есть.
Идём лупом по всем массивам из А, сравниваем номер текущего элемента с j: если совпали, то пишем сначала исходный элемент, а за ним - из v.
Паскаль у нас в школе был, так что травма у меня уже есть.
А еще более функционально на массив А натравить map
>травма у меня уже есть.
Так надо было препода нахуй послать и сдавать на тех же сях.
Опционально - ебло разбить/настучать в районо.
Поподробнее, пожалуйста.
Как бы Лисп у нас входит в программу. Предмет называется "функциональное программирование". Зачем на втором курсе давать Scheme, а на третьем - Common Lisp, я не знаю. Думают, что нам это пригодится. Или работают по принципу "Что бы солдат ни делал, лишь бы заебался".
>Как бы Лисп у нас входит в программу.
Вот дурачок, я про говнопаскаль и дегенерата-препода.
А лисп - норм вещь, для учебы вообще ок - если не зацикливаться.
>функциональное программирование
Охуенчик, но все же лисп - не совсем то.
Он сам по себе.
> Вот дурачок, я про говнопаскаль и дегенерата-препода.
Туплю. Впрочем, ничего нового.
> Охуенчик, но все же лисп - не совсем то.
Охуенчик охуенчиком, но у меня висит лаба. Спасайте, котаны.
А хуй знает, не писал на лиспе никогда :3
Но чую что тут правильно про map - так что читай описание и думай.
Такие задачки обычно в пару действий.
>двумерный массив
Есть один нюанс - в лиспе нет массивов, так что задача поставлена неверно.
> Такие задачки обычно в пару действий.
Возможно, т.к. лаба средней сложности. Ща погуглю. Вот тебе радостный котик.
Делаешь пандорический захват, лифтишь в монаду, потом строишь рекурсивную схему (здесь подойдёт зигохистоморфный препроморфизм) как монадический трансформер из категории эндофункторов, и метациклически вычисляешь результат. Любой второкурсник справится. А если делать на анафорических лямбдах - так задачка вообще на пять минут.
Я не знаю синтаксиса этих ваших лиспов, но на жабоскрипте будет где-то так:
function addArr(a, b, j) {
return a.map(
(row, i) => {
var result = row.slice(0, j).concat(b);
return result.concat(row.slice(j));
}
)
}
console.log(addArr([[1,2,3],[4,5,6],[7,8,9]], [99,99,99], 2))
Бля, тут http://js.do/code/151837
> lurkmore.to/Копипаста:Программирование
Понятно.
В лиспе все есть либо список, либо атом.
Знаю. А теперь скажи, как всё это добро замапить.
Я так и не понял, что тебе нужно получить.
> (function #2A((1 2) (3 4) (5 6)) (0 0 0) 0) => #2A((0 1 2) (0 3 4) (0 5 6)
Т.е. было
1 2
3 4
5 6
Стало
0 1 2
0 3 4
0 5 6
Не знаю, как ещё описать.
Хотя знаю:
ОП, тебе обязательно лисп нужен?
Да, в этом проблема.
Может, нахуй? Все равно после универна на JS в лучшем случае будешь писать. М?
Нет, опции "да ну на хуй" у меня нет. Лабу надо сделать.
Бля, ну как хочешь. Я тебе уже и решение малость в функциональном стиле накатал на JS.
Мне бы найти способ конвернуть JS в лисп, и будет всё пучком. Увы, ничего толком пока не нагуглил. OpVseRavnoDick надо переправить в OpIsStillADick, ИМХО.
Сорян, с утра бы на свежую голову еще перевел в этот твой лисп, но вот вечером после рабочего дня могу разве что еще на C# и F# налабать, не более.
Я такое только баксов за 15 делаю.
Поэтому тут сидишь без клиентов?
У школьников походу каникулы начались. Летом перехожу на бичпакеты.
Когда у тебя утро наступит? Могу фейкомыло оставить.
Чем занимаешься? Фрилансишь?
Часов через 8. Оставляй.
Да, делаю лабы таким как ты, только с деньгами.
Я не ОП, лол. А в остальное время?
В остальное время пытаюсь превозмогать сдв и учить что-нибудь новое, чтобы делать лабы не за 15 баксов, а за 40. Машобчик, например. Пока вот не особо получается.
Отлично, есть стимул встать пораньше. [email protected]
Ты молодец. Чем еще владеешь, кроме лиспа?
Да я лиспом и не владею, лол. Вряд ли за него платят. Но такую херню разобрать легко, тем более схему я когда-то ковырял.
А так на пистоне пишу. С и R учу. Хотя жава и плюсы популярнее.
А сколько тебе, если не секрет?
22. Так-то в таком возрасте можно было бы уже и мидлом быть, а я лох простой на самом деле.
Ебанись, в норм компаниях это еще джун.
Да? Я не разбираюсь. Но такое ощущение что можно было бы уже дохуя всего выучить, если бы мог учиться нормально. Ну, и если бы не проебал 4 года на вуз, в надежде что знания сами придут.
Вы чё ёбнутые, по возрасту квалификацию определяете?
Почему бы и нет.
> можно было бы уже дохуя всего выучить
Ну это всегда так. Кстати, я бы не думал, что 4 года в универе прошли зря. Если ты реально учился, конечно.
22 года - обычно выпускник вуза. Какой там норм дев с подобным опытом? Только джун.
> 4 года в универе прошли зря.
Но ведь говновуз. Сам мог бы выучить намного больше, даже с учетом того что не было бы мотивационного пендаля хотя его и так не было начиная с третьего курса, когда я узнал что у нас не отчисляют
> 4 года на вуз
В магистратуру не пошёл? Почему?
Потому что это не имеет никакого смысла. Это не задводачнин с их разрядами.
>22 года - обычно выпускник вуза. Какой там норм дев с подобным опытом? Только джун.
Программирование идёт уже с класса 5го, за это время может в два года из джунов выйти.
Какой в этом смысл?
лол, а нахуя идти? ещё пару лет проебать?
Вот я как раз чешу репу... Мои внутренние математик, физик и программист почти всё забыли и порядком заебались. Думаю: а не сказать ли "Ебись оно всё конём" и пойти служить, благо учусь на военке и к концу 4-го курса заимею звание лейтенанта запаса?
магистратура освобождает полностью от воинского призыва?
На время учёбы даётся отсрочка. Магистратура, ЕМНИП, её продлевает. Звание лейтенанта запаса даёт тебе военник и, внезапно, звание. Можно будет пойти служить по контракту.
Я сердечник с белым билетом, вот и не пошел, лол. Все однокуры на магистра только из-за призыва и идут.
А мне в военкомате дали Б4 - имею достаточно болячек, но ни одна до В не дотягивает. Вот и пошёл на военку - от нашего факультета желающих было меньше, чем свободных мест, потому прошли все.
Держи, оп, сделал за полтора часа с гуглом
http://rextester.com/FXZM44262
(defun insert (seq num index)
(cond ((not (null num))
(setq work-index (- (length seq) (length num)))
(setq new-sublist (push (car num) (cdr (nthcdr (- index 1) (nth work-index seq)))))
(format t "to insert: ~S ; index: ~D;~%" num work-index)
(insert seq (cdr num) index)))
seq)
(print (insert `((1 2 3) (4 5 6) (7 8 9)) `(99 99 99) 2))
мимо питонист с 5 летним стажем
http://rextester.com/FXZM44262
(defun insert (seq num index)
(cond ((not (null num))
(setq work-index (- (length seq) (length num)))
(setq new-sublist (push (car num) (cdr (nthcdr (- index 1) (nth work-index seq)))))
(format t "to insert: ~S ; index: ~D;~%" num work-index)
(insert seq (cdr num) index)))
seq)
(print (insert `((1 2 3) (4 5 6) (7 8 9)) `(99 99 99) 2))
мимо питонист с 5 летним стажем
От души, анончик! Добра тебе!
А что функция должна делать-то?
Какой результат функция должна возвращать? Большой массив или модифицированный прежний?
> Большой массив
This.
Функция должна возвращать новую матрицу размера m×(n+1), полученную вставкой после столбца с номером j нового столбца с элементами из v. j=0 означает вставку перед самым первым столбцом.
Исходный массив A должен оставаться неизменным.
Честно говоря, лучше бы ты девственность терял чем эту хуйню задротскую ебал
Ноуп, я хочу быть листвой.
ухты, говорящая рыба CL в b.
А то!
Будет весело, если тред до утра дотянет.
так а в чем проблема, делаешь вставку по i-му индексу
g 0 a v = v :: a
g j h::tail v = h :: (g j-1 tail v)
потом пробегаешься по всем строкам
f A vs j = map (g j) $ zip (A vs)
Суп, двач. Есть одна лаба.
Запрограммировать на языке Коммон Лисп функцию, принимающую три аргумента:
A - двумерный массив, представляющий действительную матрицу размера m×n,
v - вектор действительных чисел длины m,
j - номер столбца, 0≤j≤n.
Т.е. должно быть так: (function #2A((1 2) (3 4) (5 6)) (0 0 0) 0) => #2A((0 1 2) (0 3 4) (0 5 6)
Затрудняюсь с алгоритмом и, следовательно, с реализацией. Пока есть такая идея: идём лупом по всем массивам из А, сравниваем номер текущего элемента с j: если совпали, то пишем сначала элемент из v, а за ним - тот, который стоял изначально. Правильно ли думаю? Если да, то как это реализовать?
Бампаю котиками.