За первого встречного сколько серий

Почему нельзя заниматься сексом до брака это заражение паразитами. Некоторые не возможно обнаружить при жизни, только после смерти патологоанатомы могут их обнаружить. Ты получаешь удовольствие и оно мимолётно, но последствия весьма тяжкие. Как для физического тела, так и для души. Бесы и демоны могут поселится и всем от этого станет хуже.Вторая причина это не правильный выбор партнёра для жизни. Ты так спешила выйти замуж и уйти от маразматических родителей или от их чрезмерного их внимания, не важно, что схватила первого встречного и затащила в постель. «Женила» на себе. Ты поспешила в выборе сексуального партнёра. Ты мужчина не ограничивал себя в сексе, не воздерживался, поэтому и не ценишь женщину. Ты знаешь, что есть другая и зачем платить цену за эту. Распущенность причина всех проблем этого гниющего общества. Или ты женщина. Ты была с разными мужчинами и тебя судит совесть, тебе надо выйти замуж, что бы прикрыть свой грех мужем. Но он не Иисус, он Адам и не станет прикрывать тебя, но будет всю жизнь тебе мстить. Ты не дождалась своего принца и вышла за первого встречного. Вы поженились, хотя ты знала, что он тебе не пара. Ты это всё видишь, что он тебе не пара и ничего уже сделать не можешь. Потому что вы муж и жена и у вас дети. Поезд ушел. И ты понимаешь, что попала. Что всю жизнь будешь терпеть этого человека, рядом и терпеливо будешь смотреть, как он портит твоих детей, показывая негативный пример. Женщина, которая женила на себе мужчину, никогда не будет счастлива. Это, по сути, колдовство. Понятно, что сделала она это от безвыходности, но это грех. И чувство вины позволяет мужчине господствовать над женой, творить безумные поступки, мстить.Это разбитая жизнь и разбитые надежды. У таких женщин всегда голова втянута в плечи, потому, что муж деспот, дети в него, а она одна и ей от этого деваться некуда. Она всегда будет терпеть его унижения, его господство над ней и никогда не будет с ним на равных. Поэтому секс вне брака и секс до брака это грех! Ты не думаешь головой, но телом, когда ложишься в постель. А какие добрые, воспитанные, умные и благословенные дети, могли бы родится, у этой женщины, если бы она была с Богом, была послушна Ему и не грешила до брака! Написано: «Все согрешили и лишены славы Божьей». Если бы не так, то на этой земле не господствовал бы сатана, но Бог и Его любовь. Но смотрите, сколько насилия, сколько безумства и жестокости

3, 2 } ] ] ), "Seconds" ] ]&, #[[2]] ] } ], {Missing["KeyAbsent","name"],x_} :> {{"БезПерсонажей",x}} ]&@ data, 1 ], First, #[[;;,2]]& ], -Total[#]& ], "CharacterLocations"-> GroupBy[ DeleteCases[ #/.Missing["KeyAbsent","subLocation"]->Nothing, _Missing ]&@ Flatten[ Map[ With[{location=#[[2]]}, {#,location}&/@#[[1]] ]&, Transpose[ { Map[Lookup[#[[1]],"name"]&,#[[2]]], #[[2,;;,{4,5}]] } ] ], 1 ], First, #[[;;,2]]& ]|> ]&/@ DeleteCases[ Map[ { #[[{1,2}]], Lookup[ #[[3]], { "characters", "sceneStart", "sceneEnd", "location", "subLocation" } ] }&, Lookup[ GOTRawData["episodes.json"]["episodes"], {"seasonNum","episodeNum","scenes"} ] ], {_,{_Missing...}} ];Пример данных по первой серии первого сезона:Количество экранного времени у персонажей30 персонажей «Игры престолов» с самым большим количеством экранного времени:GOTInfographicsPoster[ #, "30 персонажей, которых мы видим больше всего на экране", "ImageSize"->1500]&@ circleInfographics[ { Tooltip[ Row[ { #[[1]]/.$characterImage, Style[#[[1]],14,White,Bold], Style[ UnitConvert[ Quantity[#[[2]],"Seconds"], MixedUnit[ {"Hours","Minutes","Seconds"} ] ], 14, White ] }, "\n" ], #[[1]]/.$characterCardFull ], #[[2]] }&/@ KeyValueMap[ {#1,#2}&, SortBy[ Merge[ $GOTEpisodeData[[All,"ScreenTime"]], Total[Flatten[#]]& ], -#& ] ][ [1;;30] ], "Precision"->10^-6, "StepDecrease"->0.99, "ShapeFunction"->Disk, "ColorFunction"->ColorData["Rainbow"], "ImageSize"->1500 ](оригинал)Остальных тоже не будем обделять и построим большую таблицу:GOTInfographicsPoster[ #, "550+ персонажей и их экранное время", "ImageSize"->1500, "ImageResolution"->150]&@ Multicolumn[ Style[ Row[{#[[1]]," \[LongDash] ",#[[2]]," c"}],FontFamily->"Myriad Pro",8 ]&/@ KeyValueMap[ {#1,#2}&, SortBy[ Merge[ $GOTEpisodeData[[All,"ScreenTime"]], Total[Flatten[#]]& ], -#& ] ], 6 ](оригинал)Сколько персонажей было в сериях?$GOTEpisodeN — переводит серию из формата {сезон, порядновый номер серии в сезоне} к просто порядковому номеру серии во всём сериале.$GOTEpisodeN= ;$GOTEpisodeID — операция, обратная к $GOTEpisodeN.$GOTEpisodeID= ;Построим гистрограмму количества персонажей, задействованных в каждой из серий «Игры престолов»GOTInfographicsPoster[ #, "Количество персонажей в сериях "Игры престолов"", "ImageSize"->1000]&@ BarChart[ #, BarSpacing->{0.05,2}, AspectRatio->1/2, ImageSize->1000, ChartLabels->{Keys[#],Range[10]}, ColorFunction->Function[{x},ColorData["Rainbow"][x]], GridLines->{None,Range[0,100,5]}, FrameLabel-> Map[ Style[#,FontFamily->"Open Sans",20,Bold]&, { "Сезон и серия в нём", "Число задействованных персонажей" } ], Frame->True, Background->GrayLevel[0.95] ]&@ GroupBy[ Map[ {#["EpisodeN"],Length[#["ScreenTime"]]}&, $GOTEpisodeData[[All,{"EpisodeN","ScreenTime"}]] ], #[[1,1]]&, #[[;;,2]]& ]Кто из персонажей был в самом большом количестве серий «Игры престолов»?Список персонажей «Игры престолов», отсортированный по количеству серий, в которых они встречались:$GOTCharacters= DeleteCases[ Reverse[ SortBy[ Tally[ Flatten[Keys@$GOTEpisodeData[[All,"ScreenTime"]]] ], Last ] ][ [;;,1] ], "БезПерсонажей" ];Количество серий в сезоне:$GOTSeriesInSeason= Length@#2&,GroupBy[$GOTEpisodeData[[;;,1]],First]]|>;«Маска» сезона (служебный символ):$GOTSeasonsMask=KeyValueMap[ConstantArray[#1,#2]&,$GOTSeriesInSeason];GOTCharacterBySeason вычисляет в каких сериях каких сезонов был задействован персонаж «Игры престолов»:GOTCharacterBySeason[name_]:= Module[{initialData,empty}, initialData= Map[ #[[;;,2]]&, GroupBy[ Cases[ {#[[1]],Keys[#[[2]]]}&/@ Lookup[ $GOTEpisodeData, {"EpisodeN","ScreenTime"} ], {number_,episode_/;Not[FreeQ[episode,name]]}:> number ], First ] ]; empty=Complement[Range[1,8],Keys[initialData]]; If[ Length[empty]===0, initialData, (* else *) KeySort@{}&/@empty|>|> ] ]GOTCharacterBySeasonPlot визуализирует данные, полученные GOTCharacterBySeason.GOTCharacterBySeasonPlot[name_]:= Flatten@ KeyValueMap[ ReplacePart[ $GOTSeasonsMask[[#1]], Thread[ Complement[Range[1,$GOTSeriesInSeason[#1]],#2]->0 ] ]&, GOTCharacterBySeason[name] ]$GOTSeasonColors набор цветов, для того, чтобы наглядно отображать набор серий сезона.$GOTSeasonColors= {0->White} ~ Join ~ Thread[Range[1,8]->ColorData[54,"ColorList"][[1;;8]]];Наконец, построим таблицу, в которой наглядно видно, кто из персонажей в какой серии «Игры престолов» был, а в какой не был)GOTInfographicsPoster[ #, "100 персонажей "Игры престолов", присутствовавших в наибольшем количестве серий", "ImageSize"->2500]&@ Grid[ { { "Персонаж \\ Сезон и серия", SpanFromLeft, Style["% серий\nс участием\nперсонажа",12] } ~ Join ~ Map[ Style[ "S"ToString[#[[1]]]"\nE"ToString[#[[2]]],10 ]&, Keys[$GOTEpisodeN] ] } ~ Join ~ ( ( { ImageResize[#/.$characterImage,{Automatic,25}], #, PercentForm[ N@Total[Length/@GOTCharacterBySeason[#]] / Last[$GOTEpisodeN] ] } ~ Join ~ ReplaceAll[ GOTCharacterBySeasonPlot[#], x_Integer:>Item["",Background->x/.$GOTSeasonColors] ]&/@ DeleteCases[ $GOTCharacters[[1;;100]],"БезПерсонажей" ] ) ),

Позвал. )))))не надо себя переоценивать))))) и недооценивать!знаешь, посмотришь на кандидатов - рыдать хотца. ))) Иногда кажется, что выйти замуж за первого встречного выход. )))вот за первого встречного лучше точно не выходить))))говорю как очевидец.• Кися 2009-08-07 14:13:45не поняла сутьвопроса...как угадать....кто это слово должен произнести? в какой ситуации??это сложный вопрос))))хотя то слово кот должен сказать мужчина когда уже в состоянии взять на себя отчетственность за женщину мы знаем, но не скажем;))))Не будем горячиться. За первого встречного поперечного выходить. Лучше уж одной, чем с кем попало. Хотя мне один знакомый говорит:- "Что развестись всегда можно.":) Мужчине всегда проще, а у нас женщин, жизнь считай не сложилась. Люба судьбу не узнаешь, может он рядом где-нить в соседнем доме живет, а мы все ищем, ищем не знамо где:).• Kudesnik 2009-08-07 14:21:41КисяЭто слово должна девушка сказать любимому мужчине... ББЖ опередил... тоже хотел такую же беду завернуть...)))))• Кися 2009-08-07 14:26:18ХмСам вопрос поставлен так, словно мужчины жаждут позвать нас замуж, но боятся ))) И только в случае произнесения кодового слова решаются ))Какие мужчины у нас ранимые и нежные *улыбка умиления* ))• Кися 2009-08-07 14:26:58KudesnikАватарки наши очень похожи ))• -Ириска- 2009-08-07 14:31:51Люди,со схожими аватрками видимо, имеют и схожие интересы. Чую, что пара сложится.ББЖ, не повторяйся, могу и в зуб дать. И за плагиатство посадить. Кодовое слово видимо: ДА!• Кися 2009-08-07 14:34:51Ириская же замужем ))• -Ириска- 2009-08-07 14:53:59Муж не стенкаможно и подвинуть...Ну, если ты не против конечно...• Ice touch 2009-08-07 15:00:10ИрискаМужа подвигать не надо. Мы здесь, за мир во всем мире, и за крепкую семью.:)))))• Kudesnik 2009-08-07 18:22:15Кися"... Аватарки наши очень похожи..."... Это одно из кодовых слов... Не иначе как судьба...))))) *клеицца*..)))))• ББЖ 2009-08-07 21:12:54я!за равенство полов, за настоящих романтиков и за счастливые семьи.ну и за правильные кодовые слова, конешн• ББЖ 2009-08-07 12:33:30соцсетия признаю лишь однуЛинкедИн. Потому что полезно. Но у меня там мизерный рейтинг. Что объективно и больно.• Kudesnik 2009-08-07 14:24:26ББЖЯ на КМ. РУ.... только особо не активничаю.... Просто сам сайт.. как источник большого количества информации...))))• -Ириска- 2009-08-07 14:59:03УтроИ почему в нашей стране укладывают асфальт в 8 утра? Я понимаю, будни, у всех работа, но у некоторых и отпуск, так сказать самый утренний сон. Утро не задалось.Я помню у