sentdex_csv <- read.csv("http://sentdex.com/api/finance/sentiment-signals/sample/")
sentdex_appl <- sentdex_csv[sentdex_csv$symbol == 'AAPL',][,c(1,3)]
sentdex_appl <- xts(sentdex_appl[,2], order.by = as.Date(sentdex_appl[,1]))
getSymbols("AAPL", from = "2012-01-01")

tmp <- na.omit(cbind(sentdex_appl, Delt(Ad(AAPL)) ))
names(tmp) <- c("Sentdex Sentiment AAPL","AAPL")

signal <- ifelse(tmp[,1] > 5, 1,0 )
signal <- ifelse(tmp[,1] < -2, -1,signal)
chart.CumReturns( cbind(lag(signal) * tmp[,2], tmp[,2]), main = "Sentdex Sentiment AAPL",legend.loc = 'topleft')

Год назад оформлял себе платиновую карточку в одном из банков. И задумался над очень интересным явлением. Градация у карточек следующая — классик, золотая и платиновая. Платиновая естественно самая крутая и дорогая в обслуживании. А почему не золотая карта теперь самая крутая, подумал я? Золото же на тот момент было дороже платины на 20%. Ну, думаю явление временное, бывают такие перекосы на бирже. Прошел год и за это время ни разу платина даже близко не подошла к стоимости золота. Вот такое изменение парадигмы произошло за последние время. Люди, которые недавно пришли на биржу, уже воспринимают это как норму, что золото дороже платины. А когда людям, кто не в курсе, про эти изменения говоришь, они искренне удивляются и не верят. Приходится показывать им котировки. Золото стоит 1260 долларов за унцию, а платина 930$ за унцию. Интересно VISA и MASTERCARD будут реагировать на изменившуюся реальность? А то скоро VIP клиенты начнут возмущаться, типа что вы мне там подсунули! Еще бы палладиевую карту мне дали! -))) Как думаете, увидим ли мы платину опять дороже золота?

Здравствуйте!

Вот и долгожданное предложение по обучению созданию торговых роботов совершенно бесплатно ПРЯМО НА СМАРТ ЛАБЕ. Просьба посмотреть полностью, что бы быть в курсе всех нюансов.

Комментируем! Ставим лайки и подписываемся! Мотивируем автора на дополнительный контент!

Сегодняшняя новость

МОСКВА, 27 апр — ПРАЙМ. «Распадская» в первом квартале 2017 года увеличила объем реализации угольного концентрата на 11% по сравнению с аналогичным периодом прошлого года, до 1,696 миллиона тонн, говорится в сообщении компании. В том числе поставки угольного концентрата на экспорт выросли на 10% и составили 1,018 миллиона тонн, реализация в России увеличилась на 13%, до 678 тысяч тонн.
27 апреля, Москва. Поставленная менеджментом задача по поддержанию максимальных объемов продаж в период оживления спроса и благоприятных цен была успешно выполнена. Об этом сообщили в пресс-службе ПАО «Распадская».
http://www.raspadskaya.ru/docs/RASP_PR_1Q2017_RUS_final_.pdf 

Производственный отчет, по нему видно (см рисунок), что при росте реализации еще и цена выросла с 3208 руб за тонну до 7294 руб за тонну. 1кв 2017 к 1 кв. 2016.Это где-то 124-129 долларов за тонну, цена на уголь (http://quotes.ino.com/exchanges/contracts.html?r=CLRP_ALW) заметно подросла за первый квартал и это скажется на ценах реализации за 2 квартал 2017, и соответственно на показателях компании.

О ценных бумагах ПАО «Группа „РАЗГУЛЯЙ“ и ПАО „Платформа ЮТИНЕТ.РУ“

В соответствии с Правилами листинга ПАО Московская Биржа Председателем Правления ПАО Московская Биржа 26 апреля 2017 года приняты следующие решения:

1. Приостановить со 2 мая 2017 года торги в ПАО Московская Биржа следующими ценными бумагами, включенными в раздел „Третий уровень“ Списка ценных бумаг, допущенных к торгам в ПАО Московская Биржа, в связи с признанием Организаций банкротами (конкурсное производство):

1.1. Акциями обыкновенными Публичного акционерного общества „Группа “РАЗГУЛЯЙ» со следующими параметрами выпуска:

• тип ценных бумаг – Акции обыкновенные;
• государственный регистрационный номер выпуска – 1-01-33886-H от 12.03.2002;
• торговый код – GRAZ;
• ISIN код – RU000A0HG4P4.