Рассмотрим вызов метода внутри вызова lapply
для итерации по уникальным значениям дат, используемым для фильтрации фрейма данных в вызовах lm
:
# ORDER BY DATE ASC
dat <- with(dat, dat[order(Date),])
bundle <- function(curr_date) {
# REPLACING subset WITH FILTER FOR ALL DATES BEFORE CURRENT DATE
fit <- lm(y ~ x1 + x2 + x3, data = dat[dat$Date < curr_date,], model = FALSE)
# REPLACE FILTER FOR ALL DATES ON CURRENT DATE
pred <- predict(fit, newdata = dat[dat$Date == curr_date,], se.fit = TRUE)
# RETURN DATA FRAME OF RESULTS
data.frame(date = curr_date,
adj_r = summary(fit)$adj.r.squared,
fit = pred$fit,
se_fit = pred$se.fit)
}
# LAPPLY CALL
rolling_models_df_list <- lapply(unique(dat$Date)[-1], bundle)
Предполагая, что вы пишете веб-приложение на Java, я успешно использовал одну из техник - создание первой страницы. к которому обращаются - обычно это форма входа в систему - пишите куки сессии, когда страница загружается. Затем получите код Java, который отправляется формой для проверки существования этого cookie.
На клиенте:
<script type="text/javascript">
function createCookie(name, value, days) {
var expires = "";
if (days) {
var date = new Date();
date.setTime(date.getTime() + (days * 24 * 60 * 60 * 1000));
expires = "; expires=" + date.toGMTString();
}
var cookie = name + "=" + value + expires + "; path=" + "/";
document.cookie = cookie;
}
createCookie("JavaScriptEnabledCheck", 1, 0);
</script>
На сервере:
/**
* Returns <code>true</code> if the session cookie set by the login form
* is not present.
*
* @param request The HTTP request being processed
* @return <code>true</code> if JavaScript is disabled, otherwise <code>false</code>
*/
private boolean isJavaScriptDisabled(HttpServletRequest request)
{
boolean isJavaScriptDisabled = true;
Cookie[] cookies = request.getCookies();
if (cookies != null)
{
for (int i = 0; i < cookies.length; i++)
{
if ("JavaScriptEnabledCheck".equalsIgnoreCase(cookies[i].getName()))
{
isJavaScriptDisabled = false;
break;
}
}
}
return isJavaScriptDisabled;
}
В вашей форме вы можете поместить код, подобный следующему:
<noscript>
<input type="hidden" name="JavaScript" value="false" />
</noscript>
Параметр следует отправлять только в том случае, если в браузере отключены скрипты. В ваших Java-приложениях вы можете проверить это следующим образом:
boolean javaScript = request.getParameter("JavaScript") == null;
Если выполняется отправка формы, вы можете поместить в форму скрытый ввод и заполнить его значение с помощью javascript ( от OnSubmit) и проверьте это на стороне сервера.
Простая вещь - сделать обратный вызов со страницы, например, вызов AJAX. Я не думаю, что есть какой-то другой способ определить это, по крайней мере, не универсально.
Are you trying to do this server-side or on the client in an applet?
If a browser does not support javascript (or has it turned off), it's highly unlikely they will have support for Java applets.
Если у вас есть поддержка PHP, просто скопируйте и вставьте приведенный ниже код.
<noscript>
<input type="hidden" name="JavaScript" value="false" />
</noscript>
/*This code is developed by Lankeshwer(nick name only) and can be used as open source by anyone*/
<?PHP
if($_POST['JavaScript']!='false'){
echo "<run your javascript code here>";} //replace this line with your actual javascript code
else
echo "<html><head><meta http-equiv="refresh" content="0;url=www.kharida.com"></head</html>";
?>
желаю вам удачи и не забудьте открыть код